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GRAND OPENING-SYSTEMS 
FORMULATE CORPORATION 

Your Microcomputer 
Information Center 




Miplot, the intelligent plotter 
...Only $1,200 



Usable even by those with no plotter experience the 
Miplot is an ideal graphic output device for the personal 
and small business computer. It's light, compact, and 
uses ordinary, hard-tip felt pens. (Interchange and cable 
available) 

Special features include: 

" Separate pulse motor drives for x and y axis 

* Full range of intelligent functions such as line 
generator and character generator 

* Self-test-mode to verify plotter results 

* Printer mode for easy interface testing and data 
dumping 

For research, development and management planning, or 
use by the personal hobbyist. ..Miplot is the intelligent 
plotter worth your attention. 

Now on display at Systems Formulate. 
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We welcome you to visit our first consumer commercial 
sales center in the United States. Located in Palo Alto in 
the Town and Country Shopping Center, Systems 
Formulate features a full range of microcomputer 
systems and peripherals for home or commercial use. 

During the past few years since our founding in 1978, we 
have opened three retail stores in Japan stocking 
premiere American-made microsystems and innovative 
Japanese systems. 

Our new Palo Alto location will feature some exciting sur- 
prises for the American interested in microprocessing. 




Rugged, continuous-feed printers 
...Only $1,995 

Systems Formulate presents two, new continuous feed 
printers designed to withstand all the heavy duty use your 
invoices, statements and statistical analyses can dish 
out. 

Both the SFC-080 and the SFC-136 combine Japanese 
craftsman ship with many of America's finest com- 
ponents. Like the UMI 8 dot high matrix head, for exam- 
ple. 

But that's just the beginning: 

" Superior data editing ability 
Your choice of paper size 

* Sharp, clear printouts 

* Bold double-size characters 

* Graphics 

' Versitile line spacing 

' Paper-saver saving design 

Call Systems Formulate and we'll be happy to send you 
detailed specs or, better yet drop by for a personal 
demonstration. 
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SYSTGMS FORMULATe CORPORATION 

39 Town & Country Village 
Palo Alto, California 94301 
(415) 326-9100 



Store hours: Monday-Saturday, 10-7 
Sunday, 12-6 



Software for the Apple II j# 
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DYNAMAZE-a dazzling new real-time game. You 
move in a rectangular game grid, drawing or erasing 
walls to reflect balls into your goal (or to deflect 
them from your opponent's goal). Every ball in 
your goal is worth 100 points, but you lose a point 
for each unit of elapsed time and another point for 
each time unit you are moving. Control the speed 
with a game paddle: play as fast as ice hockey or 
as slowly and carefully as chess. Back up and re- 
play any time you want to; it's a reversible game. 
By Don Stone. Integer Basic (plus machine lan- 
guage); 32 K; $9.95. 



ULTRA BLOCKADE- the standard against which 
other versions have to be compared. Enjoy Block- 
ade's superb combination of fast action (don't be 
the one who crashes) and strategy (the key is 
accessible open space— maximize yours while min- 
imizing your opponent's). Play against another 
person or the computer. New high resolution 
graphics lets you see how you filled in an area— or 
use reversibility to review a game in slow motion 
(or at top speed, if that's your style). This is a 
game that you won't soon get bored with! By 
Don Stone. Integer Basic (plus machine language); 
32 K; $9.95. 



What is a REVERSIBLE GAME? You can stop the play at any point, back up and then do an "instant 
replay", analyzing your strategy. Or back up and resume the game at an earlier point, trying out a different 
strategy. Reversibility makes learning a challenging new game more fun. And helps you become a skilled 
player sooner. 

WORLD OF ODYSSEY-a new adventure game utilizing the full power of Disk II, which enables the player 
to explore 353 rooms on 6 different levels full of dragons, dwarfs, ores, goblins, gold and jewels. Applesoft II 
48K; $19.95 includes diskette. 

PERQUACKEY-an exciting vocabulary game which pits the player against the clock. The object of the 
game is to form words from a group of 10 letters which the computer chooses at random. The words must 
be 3 to 10 characters in length with no more than 5 words of any particular length. Each player has only 
3 minutes per turn. The larger the words the higher the score. Applesoft II 16K; $9.95. 

APPLESHIP-is a naval game in which two players enter their ships in respective oceans. Players take turns 
trying to blast their opponent's ships out of the water. The first player to destroy their opponent's ships 
may win the game. A great low-res graphics game. Applesoft II 32K; $14.95. 



Available at your 
local computer store 

Call or write for our free 
SOFTWARE CATALOG 

Apple II is a registered 

trademark of 
Apple Computer, Inc. 



DEALER INQUIRIES INVITED 



POWERSOFT, INC. 

P. O. BOX 157 

PITMAN, NEW JERSEY 08071 

(609) 589-5500 



Programs Available on Diskette 
at $5.00 Additional 

• Check or Money Order 

• Include $1.00 for 
shipping and handling 

• C.O.D. ($1.00add'tl. charge) 

• Master Charge and VISA 
orders accepted 

• New Jersey residents add 
5% sales tax 
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BOX 120 

ALLAMUCHY, N.J. 07820 

201-362-6574 



HUDSON DIGITAL ELECTRONICS INC. 



ANNOUNCING the hdeomnidisk 65/8 




Now, you can "plug in" the latest in a success- 
ful series of flexible disk systems developed by 
HDEforthe KIM, SYM and AIM microcomputers. 
The OMNIDISK 65/8 is a complete system, 
using 8 inch soft sectored diskettes with a 
formatted (IBM Standard) capacity of 256K.Of 
course, a disk formatting function is included 
as are system supporting utilities for file 
renaming, disk packing, copy (dual systems) 
and others. 

TED, a full featured, line oriented editor is 
standard in KIM and SYM based versions to 
get you up and running on your project in a 
hurry. The AIM version uses the on-board 
editor. With the OMNIDISK 65/8 you can con- 



centrate on your problem, the disk supports 
you all the way. 

OMNIDISK 65/8 is available in an attractive 
walnut wood cabinet, or unpackaged for OEM 
applications in dual and single drive configura- 
tions. The HDE disk controller is a state-of-the- 
art 4%" by 6V2" card electronically compatible 
with the 44-pin KIM-4 bus structure. The con- 
troller and disk-driver are designed to operate 
with the popular Shugart 801 -R and compatible 
devices. 

The OEM single drive is $1 1 95, the dual, $1 895 
and the dual in the walnut cabinet, $2200. 
Price is another reason to step up to the proven 
quality of an HDE system. 



HDE PRODUCTS - BUILT TO BE USED WITH CONFIDENCE 
AVAILABLE DIRECT OR FROM THESE FINE DEALERS: 



JOHNSON COMPUTER 

Box 523 

Medina, Ohio 44256 

216-725-4560 



ARESCO 

PO Box 43 

Auduhon. Pa 19407 

215-631-9052 



PLAINSMAN MICROSYSTEMS 

Box 1712 

Auburn. Ala 36830 

800-633-8724 



LONE STAR ELECTRONICS 

Box 488 

Manchaca. Texas 78652 

612-282-3570 



PERRY PERIPHERALS 

PO Box 924 

Millet Place. N.Y. 11764 

516-744-6462 
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Now You Can Have 

INPUT/OUTPUT 

For Your Apple Computer 



DUAL AXIS JOY- 
STICK AND PUSH- 
BUTTON MOD- 
ULE lor Games. 
Graphics, and 
Experimental Pro- 
gram Inpul 



V 



MICROSTIK 



EXTRA LONG. HEAVY DUTY 
cables and connectors 



MICROBOX AND MICRO- 
STIK PROVIDE APPLE 
OWNERS WITH THE 
HARDWARE TO EXPLORE 
THE INPUT/OUTPUT CA- 
PABILITIES OF THEIR 
COMPUTERS. 

A SIMPLE COMMAND from 
the Apple keyboard or a Basic 
Program can switch an exter- 
nal device. Connect AC loads, 
such as lamps, motors, relays 
or solenoids directly through 
the MICROBOX's 4 AC OUT- 
LETS. Loads can range from 
to 220VAC and draw up to 200 
Watts each. Solid State 
Switching ISOLATES the load 
from your Apple for complete 
safety. Four LEDs provide a 
visual on/off status of each 
load. 

A Complete Instruction/ 
Tutorial Manual is included 
with the MICROBOX. 
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INDUSTRIES 




MICROBOX 



CONNECTS DIRECTLY 
to Ihe Apple Game 
Sockel ACCEPTS 2 
Dual Axis MICROSTIKS 
or 4 Paddles 



ISOLATED SWITCH- 




ING ol 4 AC loads or 




relays Irom a basic 




program 4 LED 




slalus indicators. 




Toggle Switch input 




(sw3) 





REAL-TIME INPUT 

The MICROSTIK is a sturdy, 
two axis joystick. Metal Cable 
Connectors assure trouble 
free usage over time, and 
enable extension cables to be 
added easily. Use the 
MICROSTIK to add real-time 
input to your game, graphic or 
experimental programs. Each 
MICROSTIK contains a 
PUSHBUTTON for added in- 
put possibilities. 




MICROBOX and MICROSTIK sit 
comfortably on, or aside the Apple 
Computer. They have been designed 
to match the Apple in color and 
design. 



ORDER TODAY AND CON- 
NECT YOUR APPLE TO 
THE OUTSIDE WORLD. 

The MICROBOX and MICRO- 
STIK can be purchased at 
most computer stores or can 
be ordered directly by mail or 
through our convenient 24 
hour telephone service. 

TELEPHONE: 
(703)471-4291 

Order the MICROSET and 
receive the MICROBOX, 2 
MICROSTIKS, the Manual 
and Cassette, and SAVE $25. 

MICROBOX $109.95 

MICROSTIK (each) 34.95 

Demo Cassette 9.95 

MICROSET 164.95 

12 ft. Ext. Cables 6.95 

Relay Modules WRITE 

Solenoid Modules WRITE 

Va. residents add 4% sales lax 

MASTER CHARGE, VISA accepted 
NO C.O.D.s 

CJM Industries, Dept. MB 
31 6B Victory Drive 
Herndon Industr Park 
Herndon, Va. 22070 
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More About 16 Bits 



Last month's article by Randall Hyde, "The 
SY6516 Pseudo-16 Bit Processor" [MICRO 23:36] is 
an interesting combination of a year-old rumor and 
author fantasy. 

More than a year ago, Synertek considered 
developing a part to be called the SY6516. Several 
different SY6516's were proposed which 
significantly differed from each other. It was decid- 
ed not to develop any of the proposed 651 6's. 
Therefore, it is not "almost ready to ship". 

Of course, Synertek does have several other 
development programs running in both the 
peripheral and CPU areas. The SY6545 improved 
CRT controller and the SY6591 floppy disk con- 
troller, each with the 6502 bus, will be available 
later this year. 

This letter may not be the action referred to in 
last month's editorial. A simple phone call to 
Synertek from Micro to discuss the SY6516 would 
have forestalled publication of this article which 
has created so much confusion and annoyance 
among 6502 enthusiasts. 

Michael Smolin 

Strategic Marketing Manager, 

Synertek, Inc. 



Editor's Note: The intent of the above mentioned 
article, and my editorial 'The Value of 16 
Bits"[MICRO 23:9], was to spark reader interest in 
improved versions of our 6502 microprocessor. My 
intent was not to cause anyone "confusion and 
annoyance" and to the degree that this has occur- 
red, I apologize. I did, by the way, attempt to get 
some information from my local distributor, but 
without any success. Now that I have a contact at 
Synertek who is aware of this type of project, I will 
certainly check out any Synertek related material in 
the future. 

It is heartening to hear that the article and 
editorial did generate interest in an improved 6502. 
Several readers have written with their sugges- 
tions. If you have any ideas, please send them in. 
We will present the best ideas in an article in a few 
months. 
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WHAT'S THE ONE THING 

NO ONE HAS THOUGHT 

ABOUT DOING WITH 

COMPUTERS? 



We acknowledge that computers are the most valuable 
data processing devices ever conceived for business and educa- 
tion, and are the most creative toys on earth. However, the 
potential of computers has only begun to be explored. Avant- 
Garde Creations has discovered and developed a way to use 
computers in the areas of self-transformative experiences, life- 
awareness, making relationships work, and "getting your act 
together". 

Previously, it was thought that such trips as est, Lifespnng, 
Actualizations, and others were the only means of significantly 
dealing with the above areas. We acknowledge that they are in- 
deed valuable experiences. But because one has to devote many 
full days and hundreds of dollars to such trips, all those people 
who aren't yet ready to get into all this that deeply are left with 
nowhere to turn for such awareness experiences. 

The intention of Avant-Garde Creations is to change that. We 
have the knowledge and techniques, and now we have the pro- 
grams. The first is called "The Life Dynamic Transformation 
Experience", and the second is "The Relationship Life Dynamic". 
Both are available on disk at this time. Over the next year 9 more 
life dynamic areas programs will be developed in the follow- 
ing areas: physical, creativity, environment, meaning, condition- 
ing, sexuality, normalcy, aliveness, and responsibility. 

Why spend hundreds of dollars to find out if you're into work- 
ing on such areas of your life? Why not get something you can 
use over and over, at your convenience? 

One of the most exciting aspects of our programs is that in 
many program sections, it was discovered that "game-playing" 
was the most effective method of getting people to perceive a 
difficult truth. So from time to time you're given 100% origi- 
nal games to play, games specifically designed to give you the 
opportunity to "get" something challenging or elusive. So even if 
you don't "get" something, you'll have a great time! 

Apple II with Applesoft and 48K required with single disk drive. 

The Life Dynamic Transformation Experience. . $15.95 postpaid 

The Relationship Life Dynamic $15.95 postpaid 

Complete Program Listings available: 

The Life Dynamic Transformation Experience. . . $4.95 postpaid 

The Relationship Life Dynamic $4.95 postpaid 

NEW — The Creative Life 

Dynamic Package Jl lf you d on - t nave ^ 

(with Book) JW^I Apple II with Applesoft, 

$19.95 jl///jll there are approximately 

5 Apple stores in every 
state. We'll send you the 
address of the one near- 
est you. Your Apple deal- 
er will be glad to give or 
rent you (very cheaply) 
some time on one of their 
computers, and will be 
happy to get you started 
running the program. In 
case you think you need 
to understand computers 
to run our programs, we 
assure you that if you can 
read English and type 
your name, you won t 
have any problem. 




WANT-GARDE CREATIONS 

PO Box 30161 Eugene. OR 97403 Depl.Cl ^^ 



Announcing... 

OPTIMIZED SYSTEMS SOFTWARE 
UPGRADE YOUR APPLE II® WITH A NEW SYSTEMS SOFTWARE PACKAGE 



* 



• Unified Operating System 

• Disk Rle Manager 

• Commercial Basic 

• Editor/Assembler/Debugger 

• Data Base Manager 

Optimized Systems Software does not use Apple DOS®. OSS is a unified and complete systems software 
package with its own Operating System and File Manager. The Operating System, the Rle Manager and 
the Basic combined use only slightly more RAM than Apple DOS® alone. Requires 48K Apple II® with 
Disk II. 



Operating System 

• Byte and Block I/O 

• Simple User Interface 

• Simple Device Interface 

(create your own) 

Basic 

• Nine Digit Precision DECIMAL Roating Point 

• 32K Byte Strings 

• Variable Names to 256 significant characters 

• I/O Interface Statements 

(no PRINT "control-D...") 



File Manager 

• Open, Read, Write, Delete, Lock, etc. 

• Random Access via Note & Point 

• Rle Names of Primary. Ext type 



Editor/ Assembler/Debugger 

• Line Editor 

(Edits Basic programs, too) 

• Mini Assembler 

• Maxi Assembler 

• Disassembler 

• Step, Trace, etc. 
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Available NOW 

• Operating System + Rle Manager + Basic $69.95 

• Operating System + Rle Manager + ASM $69.95 

• Operating System + File Manager + Basic + ASM $109.95 

• Operating System + Data Base Manager (2nd Q) 

Order today. Add $2.00 for shipping & handling. California residents add 6% sales tax. Visa/Mastercharge 
welcome. Personal checks require 2 weeks to clear. 

Note: Apple II®, Apple DOS® are trademarks of Apple Computer, inc. 

Optimized Systems Software 
Shepardson Microsystems, Inc. 
20395 Pacifica Dr., Suite 108 A 
Cupertino, CA 95014 
(408) 257-9900 
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ROADRUNNER ■ 

A Math Drill for Second - Graders 



Remember 'rationalizing' the purchase of your 
microcomputer on the grounds that 'it would be good for 
the kids'? Well, he are some suggestions on using your 
Apple for Computer Assisted Instruction. 



Peter A. Cook 

1443 N. 24th Street 

Mesa, AZ 85203 
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Computer Assisted Instruction (CAI) 
will spread rapidly in the field of educa- 
tion as the use of small computers 
becomes more widespread. Children in 
their earliest school years can enjoy us- 
ing a keyboard to learn the traditional 
skills, if programs are prepared with im- 
agination and care. The greatest 
challenae in designing these programs is 
the fact that young children too easily 
become bored and lose interest. 

Making a Game of It 

My second-grader was having trouble 
beating the clock during timed math drills 
at school, so I devised a program which 
presents him wih 50 practice problems on 
an Apple II computer. Random additon 
and subtraction problems such as the 
following are displayed on the screen. 



11 
- 2 



9 
- 5 



12 

h 



The largest number used is 12, for either 
operand or result. This can be changed as 
the needs of the child dictate. 

To increase the interest level and 
heighten the student's motivation, 
several elements have been added which 
turn the drill into a game, called 
"Roadrunner". These added features pro- 
vide the child with a visible goal, im- 
mediate reinforcement, and a certain 
amount of pressure. 

Goal orientation is provided by six 
animal names which illuminate in se- 
guence as each group of ten problems is 
completed. The lowest level is the snail, 
for the beginning problems with a long 
time interval, progressing to the roadrun- 
ner for the last problem with the shortest 
interval. 

The player is informed at the end of 
each problem whether or not his answer 



is correct. If so, the next problem is 
presented. If not, the problem seguence 
is stopped, and the player is given as 
many chances as needed to determine 
the right answer. The game will not end 
until the correct answer has been given, 
so the student isn't left hanging as to 
what the proper answer should be. 

Pressure is applied in the form of a 
time countdown for each problem. The 
time interval starts at 20 seconds for the 
first ten problems, then decreases by two 
seconds after each set of ten problems is 
completed. 

The game stops running if an answer is 
not given before the time elapses, or 
when an answer is incorrect. Once the 
correct answer is supplied, or when 50 
problems are completed, the animal 
name corresponding to the highest level 
attained begins flashing. This is accom- 
panied by several beeps from the 
speaker, to officially announce the end of 
the game. 



The Program 

Coding the Applesoft program was fair- 
ly straightforward with the exception of 
the time countdown. A random number is 
first selected between and 24. If it is 
greater than 12, then 12 is subtracted 
from it, and the problem will be a subtrac- 
tion problem. A second random number is 
then selected between and 12. In the 
case of an addition problem, the sum of 
the two numbers is checked to be sure it 
is no higher than 12. For a subtraction 
problem, the second number is checked 
to be sure it is less than the first number. 
The problem is then presented on the 
screen, and a reply is reguested. 

The usual method for inputting a rep- 
ly to a guestion in Applesoft, using the IN- 
PUT or GET statement, will not work in 
this case because they cause the pro- 
gram to stop and wait indefinitely until a 
reply is keyed in. Memory location -16384 
contains the ASCII value of the last key 



depressed, plus 128, provided that the 
keyboard strobe (-16368) has been reset 
to zero.(Applesofl BASIC Programming 
Reference Manua/,Apple Computer Inc., 
1978) By PEEKing this location repeated- 
ly during a time delay loop, as in program 
lines 60 through 66, the computer will 
know whether or not an answer has been 
keyed in prior to the time interval elaps- 
ing. Since a reply could have one or two 
digits, the return key is used to signify the 
end of data input and to stop the timer 
from counting down. 

Once the reply is received, it is tested 
for correctness, and the appropriate 
message is printed. When ten problems 
have been completed, the animal name 
and time delay are changed, and the 
above process is repeated. 

Several changes can be made to the 
program to make the game more or less 
challenging, depending on the age and 
ability of the child. Numbers larger or 
smaller than 12 can be programmed in by 
changing H in line 2. The time interval, 20 
seconds, is defined by T in line 4, and the 
decrease after each ten problems, 2 
seconds, is subtracted from U in line 84. 

One caution needs to be mentioned 
which could cause some frustration if not 
explained before using the program. The 
process of reading the keyboard using 
PEEK (-16384) depends on the particular 
time during the cycle that a key is 
depressed, and for how long. It seems to 
work about 95 per cent of the time. Watch 
the screen to be sure each digit is printed 
before pressing the next key during the 
time countdown, or an incorrect answer 
will be accepted. Sometimes the desired 
key must be pressed one or two additonal 
times. The time interval is purposely long 
enough to allow for this. Also, if the 
wrong key is pressed, you cannot back up 
and correct it. 

That completes the description. Type 
in the program, have your second-grader 
RUN it, and see if he can answer the pro- 
blems fast enough to become a 
ROADRUNNER. 
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4 

e 
s 

10 

12 



:14 
16 



IS P 

20 
21 



23 



29 

30 
31 
32 



36 

33 
40 
42 

44 
45 
46 

58 



54 

55 



PETE COOK, 

NUMBER 

T I ME, SECON 

1 TO 6 : READ 



REM TOP MARGIN 

REM WIDTH, ALTERN 
LEFT HALF TO RIGHT 



1LIST0 

9 REM "ROADRUNNER", 
OCT 79 
H = 12: REM HIGHEST 
T = 28 : REM LONGEST 
DS 
DIM W*<6> : FOR W = 

W*<W> : NEXT 
DATA SNAIL, TURTLE, CHIPMUNK, RAB 
BIT, COVOTE, ROADRUNNER 
REM PRINT HEADINGS: 
HOME : HTAB 11: PRINT "R O A 
D R U N N E R" : PRINT : HTAB 
9: PRINT "50 ADD,-'SUBTRACT PR 
OBLEMS" 
POKE 34, 5 : 
POKE 33, 22 
ATES FROM 

HALF 
= 1:X = © 

REM RESET 
W GAME 
REM PRINT ANIMALS: 
VTAB 10 : FOR W = 1 TO 
= V THEN INVERSE : 
1 THEN FLASH 
PRINT W*<W>: NORMAL : 
NEXT 

1 THEN FOR C 
D = 1 TO 10 : 
<T>i : NEXT C 
5 BEEPS 
REM BLANK LAST PROBLEM, PR IN 
T NEW NUMBER AND TIME REMAIN 
ING: 
VTAB 6 : CALL - 363 : REM BLA 

NK LINE 
POKE 32,17: REM LEFT MARGIN 
FOR C = 1 TO 20 : FOR D = 1 TO 



V = 1:Z = O 

VARIABLES 



U = 
FOR 



T: 
NE 





ROADRUNNER 


50 ADD/SUBTRACT PROBLEMS 


NUMBER: 32 


SECONDS: 9 


SNAIL 


12 
— i 


TURTLE 


CHIPMONK 


ANSWER? 7 


RABBIT 


WRONG, TRY AGAIN. 


COYOTE 


ANSWER? 8 


ROADRUNNER 


RIGHT! 



6: 
IF 



IF W 

2 = 



22 



24 



25 

26 

27 



IF Z = 

: FOR 

CHR* 

REM 



PRINT : 

= 1 TO 5 
NEXT D : PR I NT 
GOTO 90 : 



60: NEXT D: CALL 
C: REM SCROLL UP 
POKE 32, : VTAB 6 : 
BER: ".i P: POKE 32, 
1 TO 1000: NEXT : 



- 912 : NEXT 
ONE LINE 
PR I NT " NLIM 
17 : FOR D = 
REM DELAV 



VTAB 6: HTAB 3: PRINT "SECOND 

S: "iU 
REM SELECT NUMBERS: 
S* ■ " + " : L = H : A = 
M = INT < RND <X> ■■*■ 100 > : IF 
M > 2 + H THEN 32: REM TOP N 
UMBER 
N = INT < RND CSL> + 100 > : IF 
N > H THEN 34 : REM BOTTOM NU 
MBER 
IF M > H THEN 42: REM SUBTRAC 
T 
S = M + N : IF S > H THEN 34 

GOTO 46 
L = M - H: IF N > L THEN 34: REM 

TOP NUMBER MUST BE LARGER 
S = L - N:S* = "- " :M = L 
REM PRINT PROBLEM: 
FOR D = 1 TO 1000 : NEXT : REM 

DELAV 
VTAB 9: HTAB 3: IF M < 10 THEN 

HTAB 9: REM RIGHT JUSTIFY 
PRINT M: HTAB 6: PRINT S*.; 
IF N < 10 THEN HTAB 9 
PRINT N: HTAB 6: PRINT " " 



Figure 1: End of game, Problem 32 
was answered incorrectly. "RABBIT" 
flashes to show highest level achiev- 
ed. 

56 REM INPUT ANSWER, TEST IT: 

57 V = U * IS: REM MULTIPLIER FO 

R ACTUAL SECONDS 

58 PRINT : PRINT : HTAB 3: PRINT 

"ANSWER? ".; : REM NO CURSOR 
SO I = PEEK < - 16384? : POKE - 
16363, O : REM READ KEYBOARD, 
RESET KEYBOARD STROBE 
62 IF I = 141 THEN VTAB 15: GOTO 
74: REM RETURN KEY INDICATE 
S ALL DIGITS RECEIVED 
64 IF I > 127 THEN A = A * 10 + 

VAL < CHR* <I - 12S>>: VTAB 
14: HTAB 11: PRINT A: REM 
WEIGHT KEYSTROKES FOR UNITS, 
TENS 
€S V = V - 1: IF V > O THEN VTAB 
6: HTAB 13: PRINT " ".; : HTAB 
12: PRINT INT <V / 1S> : GOTO 
60: REM BLANK SECOND DIGIT 
OF SECONDS REMAINING 
70 Z = 1 : VTAB 16 : HTAB 5 : PR I NT 
CHR* <7>> "TOO LATE!" 

72 PRINT : PRINT : HTAB 3: INPUT 

"ANSWER? "; A 
74 IF A = S THEN 73: REM CORRECT 

ANSWER 
76 Z = 1: PRINT : HTAB 5: PRINT " 

WRONG, TRY AGAIN!": GOTO 72 

73 P = P + 1: IF P = 51 THEN Z = 

1 : V . = 6 
30 PRINT : HTAB 5: PRINT "RIGHT! 

II 

32 POKE 32,0: IF Z = 1 THEN 21: REM 

Z STOPS GAME 
84 X = X + 1 : IF X > 9 THEN X = © 
: Y = Y + 1 : U = U - 2 : REM CH 
ANGE ANIMAL AND TIME INTERVA 
L AFTER 1© PROBLEMS 
86 GOTO 21 
90 VTAB 24: INPUT "ANOTHER GAME 

CtVNV? ":■ I*: IF I* = "V" THEN 
POKE 33, 4© : HOME : GOTO 16 
92 POKE 34, : POKE 33, 40 : HOME : 
END 



t 



• 
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Roadrunner 
Variables List 



A Answer 

C Counter 

Delay 

H Highest Number 

| Input 

1$ Input 

L Top number for subtraction 

M Top number 

N Bottom number 

p Problem number 

S Sum or difference 

S$ Sign 

T Maximum time interval 

U Decreased time interval 

V Actual seconds remaining 
W$(6) Winning animal 

W Subscript 

X Counts ten problems 

Y Level attained 
Z Ends game 



©a&a 



A new Co-Resident Applesoft Editor for applesoft 
programmers. Now perform global changes/finds 
to anything in your applesoft programs. Quote 
range of lines from one part of your program to 
another. A fully optimized stop-list command that 
lists your program to the screen with no spaces ad- 
ded and forty columns wide. Append to other ap- 
plesoft programs from disk. Get a formatted 
memory dump to help debugging. Renumber ap- 
plesoft programs 5 times faster than most available 
renumber routines. Automatic line numbering. All 
utilities invoked with one-key commands. 
C.R.A.E. changes your applesoft program right in 
memory and only needs to be loaded once. 

Hardware requirements for all utilities are 48K 
Apple II or Apple II Plus, applesoft ROM and Disk. 

C.R.A.E. 1.... Includes global find/change, quote, 
dump and List renumber, autoline, and append. 

Disk — $14.95 

Highlands Computer Services 

14422 SE 132nd 

Ronton, WA 98055 

WA residents add 5.3% sales tax. Applesoft and Apple are 
registered trademarks of Apple Computers Inc. 



Southwestern Data Systems 

presents 

NEW SOFTWARE BY 
ROGER WAGNER 

APPLE-DOC: This program set is a must to anyone writing or using 
programs in Applesoft! It not only provides valuable information on 
each of your programs, but allows you to change any element through- 
out the listing almost as easily as you would change a single line! With 
APPLE-DOC you can produce a list of every variable in your program 
and the lines each is used on, each line called by a GOTO. GOSUB. etc.. 
in fact, every occurance of almost anything! You can rename variables, 
even do local or global replacement editing on your listing. 



DISKETTE OR CASSETTE: $24.95 

(Applesoft only) 



(14 pgs. documentation) 



ROGER'S EASEL: What would be the easiest way to put lo-res graphics 
in a program? Probably to be able to just draw it with a sketch program 
and then somehow attach the picture itself to the program for later 
recall. Impossible? Not with ROGER'S EASEL! Create your own lo-res 
pictures with this program set, and then selectively attach them to your 
own Integer or Applesoft programs. Up to 40 pictures (or even text 
pages) can be permanently linked for nearly instantaneous (up to 10 
pictures per second!) recall to either pg. 1 or 2 of text/graphics display. 
(Easel is in Int., Link prog, is in Int. & A/S) 



DISKETTE OR CASSETTE: $16.95 



(10 pgs. documentation) 



THE CORRESPONDENT: At last an economical alternative to the 
higher priced text editors now available! THE CORRESPONDENT not 
only supports upper/lower case, but features character & line insert & 
delete functions. Output can be from 40 to 80 columns, with 4-direc- 
tional scrolling to allow you to see exactly what will be output to the 
printer. It's very fast FIND routine makes it ideal as a free-form database 
for storing notes, phone lists, or anything where report generation is not 
essential. It will also access random or sequential text files — useful not 
only for the editing ability, but to examine & transfer data files, or for 
building your own EXEC files, routines are even included for putting the 
bidirectional scrolling in your own programs! 



DISKETTE ONLY: $34.95 



(32K Applesoft ROM or 48K RAM) 



PROGRAMMER'S UTILITY PACK: A collection of many useful pro- 
grams to aid in programming the Apple II. This set includes: Renumber- 
Applesoft & Int.: Printer output of old/new lines, non-destructive to 
mach. code within BASIC listing. Append-Applesoft & Int.: Easily join 
one program or section thereof to another. Address/Hex Converter: 
Converts all of the Apple's address formats including high- and low- 
order bytes lor pointers. Line Find-Applesoft & Int.: Find the location of 
any BASIC line in memory for repairing garbaged programs, or insert- 
ing illegal statements like HIMEM:, CLR directly into listings. And there 
are many more! The extensive (14 pgs.) documentation alone is worth 
the price! It includes an in-depth explanation of the internal workings of 
Integer BASIC and Applesoft to allow you to do things you never 
thought possible on your APPLE! 

DISKETTE OR CASSETTE: $16.95 

(California residents add 6% Sales Tax) 

Available from your local computer store or: 

Southwestern Data Systems 

P.O. Box 582-M 

Santee, CA 92071 

(714) 562-3670 

(Dealer inquiries invited) 



INTRODUCING . . . NIBBLE 
THE REFERENCE 

FOB APPLE COMPUTING 



nibble 




NIBBLE 18: 

A SOFTWARE GUIDE for high quality Applications 
Programs for your Home and Business. 

NBBLEIS: 

A REFERENCE GUIDE to new Programming Methods. 

NIBBLE IS: 

A BUYERS GUIDE for making purchase decisions on 
new products. 

NIBBLE IS: 

A CONSTRUCTION PROJECT COOKBOOK for adding 
function and value to the system you already own. 

NIBBLE IS: 

A COMMUNICATIONS CLEARING HOUSE for users, 
vendors , and assoc iat ions . 

Each issue of NIBBLE features at least one significant new application program of 
commercial quality. The programs in NIBBLE are surrounded with articles which show 
how to USE the programming methods in your OWN programs. 

Examples of upcoming articles: 

□ Modeling and Forecasting Your Business □ Build a Two-Tape Controller for $12 

□ Arcade Shooting Gallery — Save Your Quarters ! □ Data Base Management 
System!, II, III 

And many many more ! NIBBLE will literally "Nibble Away" at the mysteries of your 
system to help you USE IT MORE. In 1980. the principal featured system is the Apple II . 

Try a NIBBLE 

nibble 

BOX 325 Lincoln. Mass. 01773 

I'll try NIBBLE! 

Enclosed is my $15 for 8 issues. 

D check D money order 

Name 



It by micro-Software hihlishing 
and Research Co.. 

Lincoln, Mass. 01773. All rights reserved. 
'Apple II is a registered trademark of 
Apple Computer Company 



Address. 

City 

State 



Zip. 



t 



t 



Plotting with Special Character Graphics 



A primer on, and program for, generating plot mode type 
graphics with special characters. Applicable to the PET, 
Challenger, and other micros. 



Dale DePriest 

611 Galen 

San Jose, CA 95106 



Microcomputers that support graphics 
are basically one of two types. One type 
supports their graphics with a special set 
of graphics characters that are printed or 
poked on the screen thereby drawing the 
picture you were trying to portray. Ex- 
amples of this type of computer are the 
Challenger, Sorcerer, and Pet. The se- 
cond type of graphics support divides the 
screen into small squares or rectangles 
which are turned on or off by specifying 
their address in a matrix system. These 
points are said to be "plotted" on the 
screen in the same fashion that you 
would plot on a piece of graph paper. Ex- 
amples of this type of machine include 
the Compucolor, Intecolor and TRS-80. 

If you are an owner of the first type of 
computer and have ever been envious of 
the people who own the second type or 
would like to use graphics programs writ- 
ten for the second type then this is the ar- 
ticle for you! A program will be presented 
that allows you to duplicate the plot 
mode graphics and allows you to create 
your own expanded graphics mode. 

First let us take a minute and ensure 
that everyone understands plot mode 
graphics. I will use the TRS-80 for an ex- 
ample. They have divided the screen into 
128 points across (horizontally) and 48 
points down (vertically). To identify any 
single point you must specify its location 
with two numbers; the first will identify 
how many points over from the left edge 
of the screen your point is and the second 
number will identify how may points 
down from the top edge. To turn a point 
on you would use the instruction SET 
(X,Y) where X is the distance across 
(0-127) and Y is the distance down (0-47). 
To draw a line across the screen you 
would have to write a program that would 
specify a value for Y and included a loop 
that would increment or decrement X un- 
til the line was drawn. 



For example, consider the following 
program: 

10 Y =6 

20 FOR X = TO 63 

30 SET (X,Y) 

40 NEXT X 

This program would plot a line near the 
top of the screen beginning at the left 
edge and extending across to the center 
of the screen. 

The TRS-80 has three instructions that 
support their graphic; one to turn a point 
on, one to turn a point off, and one to ex- 
amine a point to see whether it is on or 
off. 

Some people call this graphics mode 
"high resolution" or simply HIRES 
graphics since this is the smallest incre- 
ment of data that the programmer has 
control of. HIRES graphics capability of 
the TRS-80 is 128 x 48. A low resolution 
graphics capability exists also and is in- 
herent in all computers whether they have 
graphics capability or not. This LOWRES 
graphics mode is simply to use a charac- 
ter form the keyboard (such as X) and 
draw pictures with it. Most people have 
used this technique when playing around 
with a typewriter. In this mode the TRS-80 
would have a resolution of 64 x 16. (The 
number of characters per line by the 
number of lines.) To use this mode of 
graphics you would simply use print 
statements. 

Intecolor and Compucolor use a 
method very much like that used by Radio 
Shack. They use a sequence of PLOT in- 
structions to accomplish their graphics 
capability. In addition, they have some 
subplot modes which allow you to draw 
lines and bars without the necessity of 
writing loops like the one I showed you 
for the TRS-80. This capability gives the 
programmer a very powerful tool for fan- 



cy graphing such as vector mode, point to 
point lines, bar graphs, etc. 

Most home computers display the 
screen from a memory somewhere in the 
64K that a programmer has access to. 
The BASIC interpreter program simply 
places the information in the proper ad- 
dress of this memory and the hardware of 
the computer constantly displays this 
memory on the TV tube that you look at. 
For this reason, if you know where this 
refresh RAM (memory) is located, then 
you can simply use the BASIC PEEK in- 
struction to find out what is there and the 
POKE instruction to put anything you 
choose on the screen, whether it be 
keyboard characters or graphics 
characters. Normally each character on 
the screen occupies one byte of data in 
the refresh RAM. This means that there 
are 256 possible characters that can be 
displayed. The way that each manufac- 
turer uses these 256 characters is one of 
the major differences between home 
computers. 

The TRS-80 is no exception. They 
reserve 64 of these characters for the 
keyboard, 64 of these characters are used 
for the double width characters and the 
other 128 are the graphics characters. 
Mathematically it can be shown that the 
128 characters are enough to contain all 
possible combinations of 6 bits (2 6 = 128); 
therefore what Radio Shack did was 
divide a character into 6 pieces arranged 
in a two by three group. 

Compucolor and Intecolor devote two 
bytes of data to each character on the 
screen since they must also include color 
information. This also gives then the abili- 
ty to devote 256 characters to graphics, 8 
bits in a two by four group, and thus they 
have a higher resolution capability than 
does Radio Shack. 
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Now that you understand plot mode 
character graphics let's see how we can 
duplicate this graphics mode with the 
special character graphics. The 
demonstration programs and the special 
graphics subroutine we'll be looking at 
will run unmodified on a PET computer 
but I'll try to include enough notes so that 
it should be easy to modify these routines 
for any computer that uses Microsoft 
BASIC as long as the graphics symbols 
are available. 

The symbols that we are going to use 
are shown in Figure 1 . Since we are going 
to divide our characters into four bits we 
will need 2' or 16 characters. PET has 
thoughtfully provided all of these 
characters on the keyboard, although 
some will have to be used with the RVS 
key. Challenger doesn't provide these 
characters from the keyboard but you 
should be able to find them listed in the 
graphics program book. The first one is 
simply a space. 

Since we plan to poke these characters 
on the screen, we'll need to know the 
decimal equilalents of all of these 
characters. The following subroutine will 
build an array of all the characters shown 
in figure 1 by using the decimal 
equivalents of these characters in the 
data statements. 

32000 DIM X2 (15) :FOR Y1 =0 TO 
32010 READ X2(Y1): NEXT: RETURN 

32020 DATA 32,126,124,226,123,97, 
225,236,108,127,225,251, 
98,252,254,160 

If you don't have a PET, change the DATA 
statement per your machine documenta- 
tion. Be sure to enter them in the order 
shown in figure 1. 

My subroutines all use the variables X, 
Y, plus these variables with numbers. 
This is done to minimize the impact on 
variables you may be using in your pro- 
gram. Variable definitions are given in the 
table below. 

X The horizontal coordinate of the 
point 

Y The vertical coordinate ot the 
point 

XI The decimal address of the 
character that the point is in. 

X2 The original data at the address 
X1 

X3 A flag to tell the subroutine 
what kind of plotting is desired (see text) 

Y1 The pointer into the array con- 
taining our plot character 

Y2 A flag indicating which one of 
the four points in the character that X,Y 
points to 



X2(Y1) The array of possible plot 
characters 



Now let's look at the program in detail. 
Line 50 gets rid of any ambiguity about 
the value of X; first by making sure that it 
is an integer and then by making sure 
that the point is on the screen. The 
number 79 is one less than twice the 
number of characters you have across 
your screen. A good value to use on the 
Challenger 1P is 47; Challenger 2 would 
use 127. 

Line 52 does the same thing for Y. The 
number 49 represents one less than twice 
the number of lines. 

Line 54 generates the address of the 
character we are interested in and peeks 
the current value. It then searches to try 
and match this value with the array that 
we set up earlier. The number 40 is the 
number of characters on the Pet line. For 
a Challenger 1P this must be 32. 32768 is 
the decimal address of the starting loca- 
tion of the Pet memory map for screen 
refresh. Your system documentation 
should tell you where yours is located. 
For the Challenger 1P this starting loca- 
tion depends on the TV overscan but 
53349 should be a good place to start. 

Line 56. If the search is unsuccessful 
and X3 is a zero, we'll assume Y1 = 0, 
thereby overwriting any data that is 
already on the screen. Otherwise, we will 
abort the plot and preserve the data on 
the screen. 

Lines 58 and 60 find the proper 
quadrant of the character. 

Let's skip lines 63, 64 and 66 for now. 

Line 68 does the actual plotting by or- 
ing the old data pointer and the quadrant 
pointer. If you've gotten this far and you 
suddenly find that your machine won't, or 
that there are two numbers together, then 
please drop me a line and I'll give you a 
program that does the same thing with 
logical IF tests. Be sure to tell me what 
kind of machine you have. 

The program we have just discussed 
will simulate the TRS-80 SET instruction 
except that we can also have control over 
what happens should our plot program 
encounter a normal print character. To 
demonstrate this, consider the following 
example: 

5 GOSUB 32000 

10 Y = 6 

20 FOR X = TO 39 

30 GOSUB 50 

40 NEXT X : END 



If you have entered the two subroutines 
prior to this, then this program will draw a 



line half way across the screen near the 
top, just like the Radio Shack program 
did. Now, remove these lines (5 through 
40) and enter the following program. 

10 PRINT CHR$(147):REM CLRS 
SCREEN 

20 GOSUB 32000 

30 GOTO 100 

100 FOR X = TO 79 

110 Y = 24 + 15 * SIN(X/5) 

120 GOSUB 50 

130 NEXTX 

140 END 

When you run this you should have a nice 
sine wave appear on the screen. 

Radio Shack has a RESET instruction 
also that allows them to turn off a bit. 
Some of the time this is used to simulate 
a ball or bullet for animation purposes. 
Since this program is in Basic which is in- 
herently slow for this sort of thing, I have 
provided for a special feature to allow 
simulating this kind of action. Please add 
this one line to your earlier program. 

115 POKE X1.X2 
This turns off the bit that was just turned 
on by poking back the original value. 
Once you have tried this program, please 
be sure to remove line 115. This is not the 
only use of the RESET instruction, 
however. We should be able to simulate 
this instruction also. Now we can discuss 
the rest of the main subroutine. 

Line 62 holds the key to the power of 
this subroutine. By setting X3 to a par- 
ticular value we can use this subroutine 
to do many plotting functions. We have 
already discussed the values of X3 = 
and X3 = 1. 

Line 64 is required since the ON in- 
struction cannot work with X3 = 0. 

Line 70 is the place we will jump to if X3 
= 2. Add the following lines to your pro- 
gram and try it again. 

140 IFX3 = 2 THEN END 
150X3 = 2 
160 GOTO 100 

As you can see, X3 = 2 simulates the 
RESET instruction very well. You should 
now save your program tape. 

This same routine provides more ad- 
vanced functions as well which are 
similar to those supplied by Compucolor. 
For example, if X3 = 3, then a test is 
made on the bit at the X,Y coordinate. If it 
is off, we'll turn it on but if it's already on, 
we'll turn it off. This decision is made 
with line 66. 

Line 72 is the line we will get to if X3 = 
4. This will cause us to enter the X-bar 
graph mode. Consider this program: 

5 GOSUB 32000 

10 PRINT CHR$(147) 
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15 Y = 6 

20 X3 = 4 

25 X = 39 

30 GOSUB 50 

35 END 
It draws the same horizontal line we saw 
earlier but we didn't have to write a loop. 
It was also a little faster. 

Line 74 is where you will end up when 
X3 = 5. This enters the Y-bar graph mode 
and vertical lines will be drawn. 

Of course several more variations could 
be derived depending on your applica- 
tion. For example, if X3 = 6 pointed to 
line 76, then 
76GOSUB68:X = X-1:Y = Y + 1:GOTO50 

would draw a diagonal line. Or alternate- 
ly.an adaptation of line 66 could provide a 
status that would indicate whether one 
bit was on or off. 

Final Considerations 

This routine is intended to reside near 
the front of your using program since 
subroutines at the beginning of programs 
execute faster than those near the end. 
The initialization subroutine only ex- 
ecutes once, so placing it at the end 
simply gets it out of the way. 

Notes on the Challenger 1P 

In addition to the changes described in 
the text, you will have to make the follow- 
ing changes to run this program on the 
Challenger 1P. Line 54 will have to be 
broken into two lines since it is more than 
72 characters long. The same is true of 
line 32020. Although Challenger has a 
very extensive set of graphics characters, 
they really blew it when using the sixteen 
characters described in this article. Four 
are missing. This prevents not only a 
clean implementation of this program but 
alos prevents another use for these 
characters such as that of creating large 
lettering. The best compromise may be 
the following statements: 



32020 DATA 32, 168, 166, 155, 167, 156, 
170, 175 

32030 DATA 165, 169, 157, 177, 154, 178, 
176, 161 

Challenger should consider changing 
their ROM; perhaps changing 171 through 
174. 
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Main Subroutine 

50 X = INT(X): IF X 79 OR X THEN RETURN 

52 Y = INT(Y): IF Y 49 OR Y THEN RETURN 

54 X1 = INT(X/2) + 40*INT(Y/2) + 32768: X2 = PEEK(X1): FOR Y1 =0 TO 
15: IF X2 = X2(Y1) THEN 58 

56 NEXT: Y1 =0: IF X3 THEN RETURN 

58 Y2 = 1: IF X/2 - INT(X/2) THEN Y2 = 2*Y2 

60 IF Y/2 - INT(Y/2) THEN Y2 = Y2*4 

62 ON X3 GOTO 68,70,66,72,74 

64 GOTO 68 

66 IF X2(Y1 OR Y2) = X2(Y1) THEN 70 

68 POKE X1, X2(Y1 OR Y2) : RETURN 

70 POKE X1,X2(Y1 AND 15 - Y2) : RETURN 

72 GOSUB 68 : X = X - 1 : GOTO 50 

74 GOSUB 68 : Y = Y + 1 : GOTO 52 



DAKIIM5 UTILITIES 



' QACIkS FAUUUfflllK AIDS WAU - 

today's oati nntm 
i. tw tism 

l. TW rua> 
1. T>€ CAUAOCA 

4. i* un nil copt 

5. TW PHO»»Tl« 

t. tw caiculator 

7. TW OlStfTrt COPT 
1. CHU4J TODAY'S OATI 
IKTIK YOU* StllCTlC* -> - 



DAKIHS PBOtaWWlW AIDS II WW " 
TODAY'S OATI 12/17/71 

1. TKt StAUA PAHtm 

2. TW ARMY tOlTOR 
J. TW COPir* 

4. TW 'ATOM 

$. TW uw cross MFinma 

4. TW VARIABLE CROSS REtlREAC! 

7. TW CAICULATOR I] 

I. OUNCE TODAY'S OATl 

DtTER TOUt SUICIIOA ->. 



The C runcher removes REM statements and compresses code in Applesoft 
programs. The Prompter is a powerful data entry subroutine that can 
handle both string and numeric data. Options include using conrnas, 
decimal points, and leading zeros with right-justified numerics. A 
A maximum field length can be specified to prevent overflow in both 
numeric and alphanumeric fields. The Diskette Copy formats an out- 
put disk, copies each track, and verifies that the output matches 
the input. PLUS FOUR MORE UTILITIES TO AID YOUR OWN PROGRAMMING. 
Suggested Retail Price for Dakin5 Programming Aids is $39.95. 

The Copier copies absolutely any kind of file or program from one 
diskette to another. The Variable Cross Reference produces a cross- 
reference for all variable names used in an Applesoft BASIC program. 
The Line Cross Reference creates a cross-reference for an Applesoft 
BASIC program, showing where a given line is referenced by GOTO, 
GOSUB, THEN, or LIST statements. The Patcher allows you to display 
any sector of a diskette, and then to update any data within that 
sector. PLUS THREE MORE UTILITIES TO FACILITATE YOUR OWN PR0GRW1M- 
ING. Suggested Retail Price for Dakin5 Programming Aids II is $49.95. 

Each utility package includes a program diskette and very complete 
documentation. The hardware requirements are an Apple II, 48K of 
memory, 2 Disk II's, and a printer. Languages are Applesoft/Assembler. 

See your Apple dealer or contact Dakin5 Corporation, P.O. Box 21187, 

Denver. Colorado 80221. Telephone: (303) 426-609Cw | .Dakin5 developed 

the business application software The Controller for Apple Computer Inc 
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of Skylcs Electric Works 

Presenting the Skyles MacroTeA 
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The Software Development System 
For the Professional Programmer and 
The Serious Amateur Software Hobbyist 

...and for anyone who needs to automate dedicated industrial measurement 

and control applications. 

The Macro TeA, designed for use with the Commodore PET to create a 

remarkable synergism: a complete, integrated software development 

system for the 6502... the only 6502 system not requiring a separate disk 

drive. With over 60 commands for your complete machine language 

programming. 

...a lightning fast... fast... fast 

machine language assembler with 

true macro capabilities. Assemble 
16K source text in less than ten 
seconds! A single name indentifies a 
whole body of lines. Macro and 
conditional assembly support. Auto- 
matic line numbering. Labels up to 
ten characters long; 10 1 6 different 
labels. 

Install permanently without tools and in less time than it takes to load an 
equivalent sized assembler/text editor program from tape. No tape loading 
ever. And no occupying of RAM memory space: the MacroTeA puts 10K of 
executable machine language code in ROM (9800 toBFFF)and2K in RAM 
(9000 to 97FF). 

...a super powerful text editor. 26 commands with string search and replace 
capability. Manuscript feature. Test loading and storage on tape or disks. 
Supports tape drives, disks, CRT, printers and keyboard. 

...an enhanced monitor with 11 powerful commands for program debugging 
and final polishing. 

...with a warm-start button, on a 12 inch cable. Reset the PET but not the 
1792 bytes of object code in the Macro TeA RAM memory. 

...a completely solid state firmware system ...all in ROM and RAM. No 
tapes to load. The system is available from the time you turn on your PET to 
the time you shut it off. 

15 chips on a single high quality printed circuit board; interfaces with PET's 
parallel address and data bus or with Skyles Memory Adapter. A 
comprehensive 170 page manual is included 

Truly, there is simply no other system of this magnitude at anywhere near 
this price. $395.00* 

(With any Skyles Memory Expansion System, $375.00 

•California residents: please add 6% or 6.5% sales tax as required 
VISA, MASTERCHARGE ORDERS CALL (800) 538-3083 (except California residents) 
CALIFORNIA ORDERS PLEASE CALL (408) 257-9140 




231 E South Whismart Road 
MountainView.CA 94041 
(408)735-7891 



SYM - 1 BASIC "GET" Command 



Everything you need to know to implement the 'GET' 
function in SYM ■ 1 BASIC. The use of the GET function is 
discussed and several examples are provided. 



George Wells 
1620 Victoria Place 
La Verne, CA 91750 
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The SYM-1 BASIC Interpreter provides 
for an unused "GET" token which always 
produces a Function Call error (FC) 
whenever it is encountered in a program. 
GET is an alternate form of INPUT except 
that it only inputs one character for each 
call and that one character can be any 
keyboard character including control 
characters and lower case letters. The 
first section of this article describes a 
simple procedure to implement this very 
useful command. The second section ex- 
plains in detail how it works and the the 
third section offers some examples of 
BASIC subroutines utilizing the GET com- 
mand. 

Section One 
Implementing the GET Command 

Step 1: Deposit and Verify the code in the 
OBJECT LISTING. If it consistently will 
not Verify, read Section 2 before pro- 
ceding. 

Step 2: Enter the following monitor com- 
mand: 

.SD A600.A664 

Step 3: Jump to BASIC: 
JO 

Step 4: Enter and RUN a BASIC program 
such as: 

100 PRINT "HIT ANY KEY:" 

110 GET A$ 

120 PRINT ASC(A$) 

130 GOTO 100 

The GET command is always used to 
input a character string which will nor- 
mally have a length of one. (A double- 
quote (") or a NULL results in a length of 
zero which causes an FC error to occur. 
See Section 2.) Of course, the string 
variable can be either simple or an ele- 
ment of a matrix, but only one variable is 



allowed for each GET and it cannot be us- 
ed in a Direct Command. When GET is en- 
countered in a running program there is 
no prompt "?" and prompt strings are not 
allowed. This is intentional to allow for 
several characters in a row to be typed in. 
in response to several GET's or for a loop 
which examines the characters for errors 
as they are typed. It is therefore normal to 
precede GET with a PRINT statement to 
serve as a prompt. 

Section Two 

Detailed Explanation of 

GET Implementation 

The assembly language program to im- 
plement GET is stored in two sections of 
RAM that are unused by both the Monitor 
and BASIC. The first of these is the first 
32 bytes of System RAM which are nor- 
mally allocated as the Scope Buffer but 
are not changed in any way as long as 
none of the hex keypad buttons are push- 
ed (except, of course, RST and DEBUG 
ON and OFF). These 32 bytes are located 
at $A600-$A61F. The second section of 
RAM is the 16 bytes located on page zero 
at $E8-$F7. The code can be entered into 
your SYM-1 and verified using the object 
code listing or if you have Synertek's 
RAE-1, you can enter the source code as 
it appears in the assembly listing. After it 
is assembled the block of code belonging 
on page zero must be moved there from 
page $0F with the monitor command: 

B E8,FE8-FF7 

The code can not be assembled directly 
on page zero since RAE-1 also uses that 
block of memory. If you happen to have 
EPROM in your system you can also 
relocate the code there (delete line 300 
JMP GET.COMD.3). In order to activate 
GET, the System Output Vector ($A664,5) 
must be changed from its present value, 



assumed to be the Terminal Output 
routine (TOUT = $8AA0), to the GET com- 
mand processor (GET.COMD = SA600). 
This vector can be changed at the 
monitor level with the simple command: 

.SD A600.A664 
or it can be done in BASIC with: 



POKE 42596,0: POKE 42597,166 



which can be either a Direct Command or 
part of a program. If you decide to 
relocate the code to some other address 
than $A600 then be sure to use the cor- 
rect address when changing the System 
Output Vector. Please be aware of the 
fact that the System RAM is write pro- 
tected after a warm start to BASIC (G O) 
until after a LOAD or SAVE command is 
attempted (if you have the new Monitor 
ROM) or until a call to ACCESS is made 
some other way, for example, with 
QQ = USR(&"8B86",0) or unless the 
jumper at 45-MM is removed. Incidentally, 
since BASIC passes the program size and 
file ID information to the Tape routines 
through the System RAM, the first LOAD 
or SAVE after a warm start won't work. 

To understand how the GET command 
is processed look at the assembly 
language listing. Each time BASIC at- 
tempts to print any character, this routine 
will be entered. If the character to be 
printed is a carriage return, which is the 
case when any error is encountered, then 
further testing is performed to see if it is a 
Function Call error and then if it was 
caused by a GET token. If any of the pro- 
per conditions are not met then a jump is 
made to the Terminal Output routine or to 
whatever special output routine you 
might have. 
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Assuming that all the conditions for 
the GET command are met, then twelve 
bytes are taken off the stack to account 
for the series of JSR's involved in printing 
the error message. Next, the BASIC Input 
Buffer is set up as it would be if a single 
character were entered in response to an 
INPUT command. However, the routines 
that normally bring characters into the In- 
put Buffer are bypassed because they ig- 
nore all control characters (except BELL) 
and change lower case letters to upper 
case. Instead, the Input Buffer is loaded 
directly by the GET command processor 
so that all characters will be allowed. In 
addition, a double-quote is automatically 
inserted before the typed character so 
that commas, colons and spaces will also 
be properly interpreted. After the typed 
character a zero is inserted which is the 
End-of-Line token. There remains an am- 
biguity over two characters which can be 
typed in, namely, NULL and double-quote 
("), both of which will be interpreted as a 
string of zero length. The NULL looks like 
the End-of-Line token and the double- 
quote looks like the End-of-String 
character. If you are not concerned with 
this ambiguity in your application, skip 
the remainder of this section. 

There are two ways to avoid the am- 
biguity between double-quote and NULL. 
First you can change the assembly 
language instruction on line 350 from 
AND #$7F to ORA #$80 and then subtract 
128 from each character after the GET 
statement. Example: Change BASIC pro- 
gram line 630 to: 

630 CHARS = CHR$(ASC(CHAR$)-128) 

The second way to handle this is by in- 
serting three instructions between lines 
350 and 360 of the assembly program as 
follows: 

CMP #$22 
BNE +2 
ORA #$80 

But this will require relocating the code to 
accomodate the additional bytes of pro- 
gram. (Due to a minor error in RAE-1, the 
branch must be entered as BNE = + 3.) In 
this case, only a double-quote has its 
most significant bit set. It is not 
necessary to subtract 128 as long as you 
treat the ASCII code for double-quote as 
162 instead of 34. Also, line 630 of the 
BASIC program should be deleted. 

Section Three 
Examples of Using GET 

The remainder of this article will 
describe several BASIC subroutines 
which can be used to simulate the INPUT 
function for integer, numeric and string 
variables. Also described is a means to 
disable the BREAK key to make it possi- 
ble to write programs that are incapable 
of being clobbered by the operator. This 
is an especially important feature when 
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put, men you know what a boon this can 
be. It can save you from having to reload 
a program because the kids have 
unknowingly deleted lines of program by 
typing in numbers while in Command 
Level. 



running programs for the novice. It you've 
had the frustrating experience of trying to 
leave your computer in the hands of the 
kids to play games only to have them 
forget to press RETURN after every input 
and not press RETURN without some in- 

QK 

10 PROMPTS - "INPUT A STRING: " 

11 60SUB 600 

12 PRINT PHRASES 

13 60T0 10 

£0 PROMPTS ■ "INPUT A NUMBER: " 
21 60SUB 500 
£2 PRINT NUMBER 
23 6QT0 20 

30 PROMPTS = 'INPUT FtN INTE6ER: " 

31 603UB 400 

32 PRINT NUMBER* 

33 GOTO 30 
35 : 

95 REM ♦»♦ SUBROUTINE TO ACTIVATE "GET" ROUTINE *♦• 
100 Q0 = USR(&"8B86".0> : REM ALLOW ACCESS TO SYSTEM ROM 
110 POKE 42S96.0: POKE 4259?. 166: REM CHFINGE OUTPUT VECTOR TD "GET" 
120 RETURN 

185 REM ♦«-• SUBROUTINE TO DISABLE "BREAK" KEY •♦» 
195 REM SIMULATE MONITOR COMMAND: . SD 862D.A667 
200 00 = U3R(8."8B86 ".0<: REM ALLOW ACCESS TO SYSTEM RAM 
210 POKE 42570.103: POKE 42571.166: REM STORE INSVEC+1 IN P3 
£20 POKE 42572.45: POKE 42573.134: REM STORE S862D <CLC-RTS> IN P2 
230 00 = USR(&"861B".0' : REM EXECUTE STORE DOUBLE BYTE COMMAND 
240 RETURN 

285 REM ♦•►♦ SUBROUTINE TO ENABLE "BREAK- KEY ♦»♦ 
295 REM SIMULATE MONITOR COMMAND: .SD 8B3C.A667 
300 OO = USR(8."8B86' . 0> : REM ALLOW ACCESS TO SYSTEM RAM 
310 POKE 42570.103' POKE 4£571.166: REM STORE INSVEOI IN P3 
320 POKE 42572.60: POKE 42573.139: REM STORE S8B3C (TSTAT) IN P£ 
330 OO = USR(&"861D",0>: REM EXECUTE STORE DOUBLE BYTE COMMAND 
340 RETURN 

395 REM «♦» SUBROUTINE TO INPUT AN INTEGER •♦» 
400 60SUB 500: REM INPUT A NUMBER 

410 IF ABS (NUMBER) > 32767 THEN 400: REM REPEAT IF OUT OF RANGE 
420 NUMBER* = INT (ABS .NUMBERS »S6N (NUMBER): REM DROP FRACTIONAL PAPT 
430 RETURN 

495 REM *♦» SUBROUTINE TO INPUT A NUMBER •«-• 
500 GOSUB 600: REM INPUT A STRING 

510 NUMBER = VAL 'PHRASES": REM CONVERT STRING TO NUMBER 
520 RETURN 

595 REM «-»♦ SUBROUTINE TO INPUT A STRIN6 ♦»* 
600 PRINT: PRINT PROMPTS;: REM PRINT PROMPT ON NEW LINE 
610 PHRASES ■ -: REM DELETE PHRASE 
620 GET CHARS 

630 IF LEN(CHARS) = THEN CHARS = CHRS<34>: REM CHANGE NULL STRING TO 
640 IF AiC (CHARS) <> 8 THEN 680: REM BRANCH IF NOT BACK-SPACE 
650 IF LEN(PHRASES) ■ THEN PRINT RIGHTS (PROMPTS. 1> > : 60T0 620 
660 PHRASES « LEFTS (PHRASES. LEN (PHRASES) -1) : REM DELETE LAST CHARACTER 
670 PRINT " "1 CHRS(8)S: GOTO 620 

680 IF ASC (CHARS) ■ 10 THEN 600: REM START OVER IF LINE-FEED 
690 IF ASC (CHARS) ■ 13 THEN PRINT: RETURN: REM DONE IF CARRIAGE RETURN 
700 PHRASES = PHRASES «• CHARS 
710 GOTO 620 

795 REM *»♦ SUBROUTINE TO DE-ACTIVATE "GET" ROUTINE »♦♦ 
800 00 = USR(«,"8B86 -.0) : REM ALLOW ACCESS TO SYSTEM RAM 

810 POKE 42596.160: POKE 42597.138: REM CHANGE OUTPUT VECTOR TO "TOUT" 
8£0 RETUPN 
OK 
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The BASIC program lisitng contains 
two parts. The first part (lines 10-35) con- 
tains sample drivers for the three types of 
INPUT'S and the second part (lines 
95-820) contains the actual subroutines. 
The first subroutine (GOSUB 100) 
changes the output vector to point to the 
assembly language program which of 
course must be loaded prior to entering 
BASIC. The last subroutine (GOSUB 800) 
can be used to switch the output vector 
back to its normal state. The second and 
third subroutines can be used to disable 
and enable the BREAK key. These 
routines use part of the Monitor Store 
Double Byte Command to change the In- 
put Status Vector because it is impossi- 
ble to do the same thing in pure BASIC 
since the status would be checked bet- 
ween the two POKE'S and would result in 
the program going to an undesired place. 
The BREAK is disabled by simply poin- 
ting it to a routine that always returns a 
status clear. 

The subroutine beginning at line 600 
simulates the INPUT command for a 
character string. The first thing it does is 
print a prompt string which should be 
defined prior to calling the subroutine. 



The name of the prompt string is PRO- 
MPTS (or PR$). Next, the string which will 
contain the typed characters is cleared. 
Its name is PHRASES (or PH$). Then a 
loop is entered which GETs the typed 
characters one at a time and examines 
them before it puts them into the 
PHRASES string to see if they are any of 
the following special characters: 

1. NULL (same as double-quote) is 
changed to ". 

2. Back Space deletes previous 
character. 

3. Line Feed deletes entire line. 

4. Carriage Return ends the input. 

No test is made to limit the number of 
characters to 255. Therefore, typing in 256 
characters is a way to "BREAK" a pro- 
gram that has the BREAK key disabled 
since it will cause a Long String Error 
(LS). 

The subroutine beginning at line 500 
simulates the INPUT command for a 
number. It does this by calling the string 



>ASSENBLY LISTING 



A600- C9 on 

A602- DO oe 

A604- E0 08 

A60e- DO 04 

A608- CO 36 

AfcOA- F0 03 

A60C- 4C A0 8f-l 

R60F- BA 

A610- SA 

A611- 69 0B 

R613- AA 

A614- 9A 

A61S- A9 2C 

A617- 85 ID 

B619- A9 22 

A61B- 85 IE 

A61D- 4C E8 00 



00E8- £0 58 8A 
00EB- £9 fF 
00ED- 85 IF 
00EF- A2 IB 
00F1- R0 00 
00F3- 84 £0 
OOFS- 4C EA C9 



0010 
00£0 
0030 
0040 
0050 
0060 
0070 
0080 
0090 
0100 
01 10 
01£0 
0130 
0140 
0150 
0160 
0170 
0180 
0190 
0800 
0£10 
0££0 
0£30 
0£40 
0250 
0£60 
0270 
0280 
0290 
0300 
0310 
0320 
0330 
0340 
0350 
0360 
0370 
0380 
0390 
04 00 
0410 



6ET. TDKEN 
FC. ERROR 



.BE *9B 
.D£ SOS 



INPUT. COMD .DE SC9B9 
IMP. BUFFER .DE S1E 



TOUT 
INTCHR 



.DE S8AA0 
.DE *8R58 



.OS 

.BA SA600 



BASIC -6ET- TDKEN 

BASIC 'FC ERROR - TDKEN 

BASIC INPUT COMMAND INTERPRETER 

BFlSIC INPUT BUFFER 

MONITOR TERMINAL OUTPUT RDUTINE 

MONITOR INPUT TERMINfiL CHARACTER 



♦»♦ PR06PAM TO IMPLEMENT SYM- 1 BASIC ' GET" COMMAND ♦♦* 



GET. COMD 



CMP =*0D 

BNE SET. COMD. 1 

CPX =FC. ERROR 

BNE GET. COMD. 1 



TEST FOP CAPRIA6E RETURN 
AND BRANCH IF NOT. 
TEST FOR FC ERPOP AND 
BRANCH IF NOT. 



CPY =L-6ET.TDKEN*6ET. TOKEN 
BEQ GET. COMD. £ 
GET. COMD. 1 JMP TOUT IF NOT, 



TEST FOR GET AND 
BRANCH IF SO. 
CONTINUE OUTPUT. 



GET.CDMD.£ 



TSX 

TXA 

ADC =12-1 

TAX 

TXS 

LDA ='. 

STA ♦INP.BUFFER-l 

LDA =-" 

STA »INP. BUFFER 

JMP GET. COMD. 3 



.BA SE8 
.MC SFE8 
GET. COMD. 3 JSR INTCHR 



AND =S7F 

STA »INP.BUFFER*1 

LilX =INP. BUFFER- 1 

LDY «0 

STY ♦INP.BUFFER+2 

JMP INPUT. C0MD*49 

.EN 



TAKE 12 BYTES OFF STACK. 
ALREADY IN BINARY MODE AND 
CARRY SET. SO ADD 1 1. 



STDRE COMMA IM FRONT OF 
BUFFER (NEEDED BY BASIC'. 
STDRE QUOTE IN BUFFER TO 
ALLOW AUTD STRING INPUT. 
CONTINUE ON PAGE ZERO. 

STORE SE8 CODE AT iFES. 
MOVE WITH: B E8.FE8-FF7 
INPUT A CHARACTER. 

clear pnftirv bit. 

PUT IT IN BUFFER. 
X NEEDED BV BASIC. 
r^O NEEDED BY BASIC. 
END-DF-LINE TOKEN. 
CONT INTO BASIC. 



LABEL FILE: C / = EXTERNAL 1 



/GET. TOK£N«009B 
• INP.BUFFER"=001E 
6ET.CDMD=A600 
GET. COMD. 3-00E8 
""0000- 00F8- 0FF8 
> 



xFC.ERRDP-0008 

.-rour-aAAo 

GET. COMD. 1=A60C 



xINPUr.C0MD=C9B9 
•INTCHR-8AS8 
GET. COMD. 2= A6 OF 



input subroutine and using the BASIC 
VAL function to put the string into the 
variable called NUMBER (or NU). If the 
string does not convert correctly into a 
number, no error is generated, instead 
that portion of the string up to the error is 
used (or zero if it is completely wrong). 
However, if the magnitude of the number 
is too large for BASIC an Overflow 
Error(OV) results. This is another way to 
"BREAK" a program even with the 
BREAK key disabled. 

The subroutine beginning at line 400 
simulates the INPUT command for an in- 
teger. It does this by calling the number 
input subroutine and using the BASIC 
INT function to convert it to an integer 
called NUMBER* (or NU»). If the number 
is too large to be an integer, the prompt is 
repeated to avoid an error. Also, the frac- 
tional part of a negative number is drop- 
ped instead of rounding up to the next 
larger integer (absolute value). 

Obviously, similar sorts of routines can 
be written to accomodate any particular 
requirements you might have. One word 
of caution: at the lower baud rates BASIC 
can't keep up with a fast typist. Using the 
BREAK disable subroutine will keep the 
program from aborting but might result in 
incorrect characters being read. How- 
ever, if they are read incorrectly they will 
also be echoed incorrectly, so backspace 
over any errors and retype. At 4800 baud, 
BASIC can easily keep up with all but the 
fastest typist. At 110 baud it isn't hard to 
get incorrect reads, but even then it's not 
likely to be a problem with a novice 
operator. However, if you are running at 
110 baud it is probably because you are 
running on a teletype in which case you 
will have to handle the character deletes 
with something other than a back-space. 
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INTEGER PASCAL FOR APPLE II 
Translator produces 6502 code 
from P-codes, 4X faster than In- 
teger BASIC. Compiler, interpreter: 
$30. Translator additional $35. Re- 
quires 48K and disk. Cal. res add 
6% 

M&M Software Co. 

380 N. Armando, #Z-19 

Anaheim, CA 92806 

SYM-PHYSIS 

The SYM-1 Users' Group Newslet- 
ter Software/Firmware/Hardware 
$9.00 ($12.50 overseas) for 6 issues. 

P.O. Box 315 

Chico, CA 95927 

(916) 895-8751 
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| EXCERT, INCORPORATED [ 

• • • AIM -65 • • • 



SPECIAL 



A65-4AB 



AIM-65 w/4K RAM 
Assembler and BASIC ROM 



SS95 



i p/n 



A65-1 
A65-4 
A65-A 
A65-B 



=. P/N 



QTY 1 - 9 

AIM-65 w/1K RAM $375 

AIM-65 w/4K RAM $450 

Assembler ROM $85 

BASIC ROM $100 



SPARE PARTS (When Available) 

A65-P Printer $40 

A65-D Complete Display Board $85 

w/Exchange of Old Board $50 

A65-K Keyboard $30 



ACCESSORIES 



QTY 1 - 9 



Power Supplies (Fully AIM-65 Compatible) 
PRS3 + 5V at 3A, + 24V at 1A 

w/mtg hardware, cord, etc $65 

PRS4 + 5V at 2A, + 24V at .5A 

w/mtg hardware, cord, etc $50 



■ PR55 



+ 5V at 2A, +24V ±15% at .5A 
± 12V to ±15Vat.4A 



From The Enclosures Group 

ENC1 AIM-65 case w/space for PRS3/PRS4 

ENC1A AIM-65 case w/space for PRS3/PRS4 

and one expansion board 

Cases with Power Supplies 

ENC3 ENC1 W/PRS3 mounted inside 

ENC3A ENC1A W/PRS3 mounted inside . . . 

ENC4 ENC1 W/PRS4 mounted inside 

ENC4A ENC1Aw/PRS4 mounted inside ... 

ENC5 ENC1 W/PRS5 Mounted inside 

ENC5A ENC1AW/PRS5 Mounted inside .. 



$75 

$45 
$49 



$115 
$119 
$100 
$104 
$125 
$129 



£ VIB1 



- CCP1 



From The Computerist, Inc. 

MCP1 Mother Plus™ Dual 44 pin mother card 
takes MEB1, VIB1 , PTC1, fully buffered, 
5 expansion slots underneath the AIM $80 
Memory Plus™ 8K RAM, 8K Prom sockets, 
6522 I/O chip and programmer for 5V 

EPROMS (with cables $215) $200 

Proto Plus™ Prototype card same size 

as KIM-1, MEB1, VIB1 $40 

Video Plus™ board with 128 char, 128 user 
char, up to 4K display RAM, light pen and 
ASCII keyboard interfaces w/cables $245 

Cage Plus™ mounts to Mother Plus™ 
w/ card guides $25 



MEB1 



PTC1 



P/N 
From Optimal Technology 



QTY 1 • 9 



ADC1 A/D eight channels, D/A 2 channels. Re- 
quires ± 12V to ± 15V at 100MA & 2-I/0 Ports 
w/cnnctr from AIM-6522 $115 

From Seawell Marketing, Inc. 

MCP2 Little Buffered Mother™ Single 44 pin 

(KIM-4 style) mother card takes MEB2.PGR2, 
PTC2 and PI02. Has on board 5V regulator for 
AIM-65, 4 expansion slots. Routes A&E 

signals to duplicates on sides $139 

with 4K RAM $189 

MEB2 SEA 16™ 16K static RAM board takes 2114L 
with regulators and address switches 

16K $199 



PGR2 



PI 02 
PTC2 

PTC2A 



Prommer™ Programmer for 5V EPROMS 
with ROM firmware, regulators, 4 textool 
sockets, up to 8 EPROMS simultanously, can 

execute after programming $299 

Parallel I/O board with 4-6522's $260 

Proto/Blank™ Prototype card that 

fits MCP2 $49 

Proto/Pop™ with regulator, decoders, 
switches $99 



From Beta Computer (Close Out— Limited Qty) 
MEB3 32K Dynamic Memory Card w/on board DC to 

DC converters (5V only .8Amax) $375 

Miscellaneous 

TPT2 Approved Thermal Paper Tape 

5/165' rolls $10 

MEM6 6/2114 RAM Chips $45 



z 
z 



SYSTEMS 

We specialize in assembled and tested systems made from the above items. Normally, the price will be the total of the 
items, plus $5 for shipping, insurance and handling. Please call or write for exact prices or if questions arise. Six month 
warranty on all systems. 



~ Mail Check or Money Order To: 9 

1 EXCERT, INC. h 

| u . . , P.O. Box 8600 Z 

m Higher quantities quoted upon request. u/hita r.« 1 «l« umkmd = 

= cods accepted. white Bear Lake, MN 55110 m 

5 Add $5.00 for shipping, insurance and handling. (612)426-4114 

B Minnesota residents add 4 % sales tax. Z 

™ Prices subject to change without notice Z 
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A Simple Temperature Measurement 
Program and Interface 



Using a micro for temperature measurement 
demonstrates some of the problems and some of the 
solutions involved in interfacing to the real world. 



Marvin L. DeJong 
Dept. of Math & Physics 
The School of the Ozarks 
Point Lookout, MO 65726 



• 



Temperature measurements at least as 
precise as + 1°C can be made with the 
circuit shown in Figure 1 and the program 
listed in Table 1. The 555 timer integrated 
circuit operates in conjunction with a 
FENWAL GB41P2 thermistor as a temp- 
erature-to-frequency converter. The 
pulses from the circuit in Figure 1 are 
counted with the T2 counter/timer on the 
6522 Versatile Interface Adapter. A 
machine language subroutine measures 
the number of pulses in one second, 
while a BASIC program converts the fre- 
quency to temperature. 

The relationship of the temperature of 
the thermistor to the frquency of the 
puslses at PB6 is non-linear. A 
temperature -Vs- frequency curve for our 
system is shown in Figure 2. You must 
make such a clibration curve for the 
system to work. A calibration curve is ob- 
tained by immersing the thermistor and a 
previously calibrated thermometer in 
some fluid and making measurements of 
the frequency as the temperature of the 
fluid is changed. We used water, heat, 
and ice cubes to produce our calibration 
curve. The frequency measurement pro- 
gram in Table 2 is used to measure the 
pulse frequency as a function of 
temperature. If you want to use this 
system as an air themometer, then the 
fluid should be air. You will have to wait 
for nature to provide the necessary 
temperature changes. Temperatures 
below and above those shown on our 
calibration curve (Figure 2) may be includ- 
ed, depending on your intended applica- 
tion. Provided components with low 
temperature coefficients are used in the 
555 timer circuit, the precision of the 
temperature measurements made by the 
program will depend largely on the quali- 
ty of the calibration data you obtain for 
your circuit. The thermistor may be 
located in some remote location and con- 
nected to the 555 timer circuit by a 
twisted wire pair. 



The program listed in Table 1 requires 
the user to input 20 frequency 
-temperature points from the calibration 
curve. The program can be easily 
modified to input more or less data. With 
the calibration data in memory, it calls 
the machine language subroutine to 
measure the frequency of the pulses from 
the interface circuit in Figure 1. Using the 
measured frequency and the calibration 
data, it performs a quadratic interpola- 



Q+5V 



tion calculation to conver the frequency 
measurement to a temperature. It also 
converts the Celsius temperature to a 
Fahrenheit temperature and outputs 
both. In the BASIC program, statements 
number 50, 60 and 70 serve to get the fre- 
quency using the machine language 
subroutine. We are using AIM 65 BASIC, 
and the techniques necessary to call the 
machine language subroutine may vary 
from machine to machine. In any case, 




Fenwal 
GB41P2 



Figure 1: Using the 555 Timer as a 
Temperature-to-Frequency Converter 
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statement number 50 pokes the starting 
address of th machine language 
subroutine into a location where AIM 65 
BASIC can find it. Statement number 60 
actually produces the subroutine jump. 
The variable Y means nothing in state 
ment 60. In statement 70 the BASIC pro- 
gram obtains the frequency from the two 
bytes in memory where the machine 
language subroutine stored it, namely 49 
= $31 and 50 = $32 in zero page. 

Because of the way the quadratic inter- 
polation formula is applied to the incom- 
ing frequency data, it is a good idea to 
make the first calibration point entered 
into the BASIC program be F = 0, T = 
- 100 or some other low temperature 
below the range where you wish to 
operate. The other calibration points, 
from your calibration curve, are entered in 
order from low frequency-low 
temperature to high frequency-high 
temperature. For example, our first few 
data points entered were: 
0, -40 
1000, -10 
2550, 0.5 
3000, 5.0 
A close inspection of our calibration 
curve in Figure 2 shows that the first two 
sets of points are a dummy point (0, - 40) 
and an extrapolated point (1000, - 10). 
Note that the data are entered in pairs, 
frequency first, temperature second. 

For reference purposes, let's review 
very briefly the quadratic interpolation 
formula that is used. Given a function T(F) 
defined at three points, (F', Ti), (Fiji), and 
(F k ,T k ), we must find the value of the 
function at an arbitrary point F, assuming 
that the curve through the three points is 
a second degree equation (quadratic) in 
F. The equation is: 



r- 60 



T = T ] + U [-R2 Ti +( r2_ l 2 )Tj + l2 



k] 



+ U2 

where, 



( R + L) 
RL 



[RT| - (R + L)Tj + LTkJ, 




R = Fj - Fj, L = F k - F|, and 
U = (F - Fj)/(R + L). 

Refer to Figure 3 for a graphical inter- 
pretation of quadratic interpolation. In 
the program, the value of j (J in BASIC) 
that is chosen is such that F exceeds Fl 
but is less than F k . Then i = j - 1 and k 
= j + 1. Thus the points FJ and F k 
always bracket F. 

Now a few comments on the machine 
language subroutines used in the pro- 
grams in Tables 1 and 2. These routines 
are identical. They allow the T2 
counter/timer on the 6522 to count pulses 
for a number of 50,000 clock cycle inter- 
vals. The number of such intervals is 
determined by the byte of data in location 
$OF07 in the program. $14 = 20 such in- 
tervals give a total counting period of one 
second. Clearly this number may be 
changed to count pulses for either 0.1 s, 
10.0 s, or some other time interval if 
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5 10 15 20 

Figure 2: Using the Analog Devices 537J as a T/F Converter. Resistances are in Ohms 
and Capitances are in Microfarads. 

Table 1 . A sjjnple frequency-t o-temperature conversion program. 

10 DIM F(20), T(20) 

20 FOR J = 1 TO 20 

30 INPUT F(J),T(J) 

40 NEXT J 

50 POKE #,,00: POKE 05, 15 

60 Y=USR(0) 

70 Y=PEEK(49): Z=PEEK(50) 

80 FRQ=256*Z+Y 

90 FOR J = 1 TO 20 
100 IF FRQ<F(J) THEN 120 
110 NEXT J 
120 I=J-1 : K=J+1 
130 L=F(J) - F(I) 
140 R=F(K) - F(J) 
150U=(FRQ- F(J))/(R + l) 

160 TC»T(J) + U/(R*L)*(-R«R*T(I)+(R»R_L*L)»T(J)+L*L*T(K)) 
170TC=TC+U*U*(R+L)/(L«R)*(R*T(I)-(R+L)»T(J)+L*T(K)) 
180 TF = 9/5«TC + 32 

190 TC= INT(TC + .5): TF= INT(TF + .5) 
200 PRINT " "jTF;"F "jTCj"C" 
210 GO TO 60 
220 END 



<b 



$0FOO D8 START 

OF01 A 9 60 
0F03 8D 0B A0 
0F06 A9 4D 
0F08 8D 06 A0 
0F0B A9 14 
0FOD 85 30 
0F0F A 9 C3 
0F11 8D 05 A0 
0F14 A 9 FF 
OF16 8D 08 A0 
0F19 8D 09 A0 

Used in AIM 65 BASIC, 
technique. 



CLD $0F1C 2C CO A0 TEST 

IDA $60 0F1F 50 FB 

STA ACR 0F21 AD 04 A0 

IDA $4D 0F24 C6 30 

STA TILL 0F26 DO F4 

LDA $14 0F28 38 

STA CNTR 0F29 A9 FF 

IDA $C3 0F2B ED 08 A0 

STA T1LH 0F2E 85 31 

LDA $FF 0F30 A9 FF 

STA T2LL 0F32 ED 09 A 

STA T2CH OF35 85 32 

OF37 4C Dl CO 



BIT IFR 
BVC TEST 
LDA T1CL 
DEC CNTR 
BNE TEST 
SEC 

IDA $FF 
SBC T2CL 
STA PLSL0 
LDA $FF 
SBC T2CH 
STA PLSHI 
JMP BASIC* 



Other BASICS may use a different return-from-subroutine 
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Table 2. A program to measure frequency using BASIC and machine language. 
10 POKE 04,00= POKE 05. 15 



4^L 20 Y = USH(0) 

V 



• 



30 FRQ - 256*PEEK(50) + PEEK(49) 
40 PRINT FRQ 
50 GO TO 20 



$0KO0 
0FO1 
OF 03 
0F06 
OF 08 
OFOA 
OFOC 
OFOF 
0F11 
0F14 
OF16 
0F19 
OF1C 
0F1F 
0F21 
0F24 
0F26 
0F28 
0F29 
0F2B 
0F2E 
0F30 
0F32 
OF35 
OF37 



D8 

A9 60 
8D OB AO 
A9 H 
85 30 
A9 4D 
8D 06 AO 
A9 C3 
8D 05 AO 
A9 FF 
8D 08 AO 
8D 09 AO 
2C OD AO 
50 FB 
AD 04 AO 
C6 30 
DO F4 
38 

A9 FF 
ED 08 AO 
85 31 
A9 FF 
ED 09 AO 
85 32 
4C Dl CO 



START 



LOAF 



CLD 

LDA $60 
STA ACR 
LDA $14 
STA COUNT 
LDA $4D 
STA TILL 
LDA $C3 
STA T1LH 
LDA $FF 
STA T2LL 
STA T2CH 
BIT IFR 
BVC LOAF 
LDA T1CL 
DEC COUNT 
BNE LOAF 
SEC 

LDA $FF 
SBC T2CL 
STA PULSLO 
LDA $FF 
SBC T2CH 
STA PULSHI 
JMP BASIC 



Clear decimal mode. 

Set up ACR so Tl runs free and 

T2 counts pulses. 

The program will count pulses for 

$14 - 20 intervals of 50,000 clock 

cycles. Tl is loaded with $C34D, 

since $C34D + 2 = 50,000. IFR6 will 

be set every 50,000 clock cycles. 

Clear IFR6 and start Tl running. 

Set up T2 to start counting down 

from $FFFF. 

Start counting pulses on PB6. 

Has Tl timed out yet? 

No, then wait in this loop. 

Read T1CL simply to clear IFR6. 

Decrement interval counter. 

Count pulses for another interval if 

interval counter has not reached zero. 

If it has reached zero, obtain the 

number of pulses from T2 by subtracting 

the number in T2 from $FFFF. 

Result into locations $0031 and $0032. 



AIM 65 return to BASIC command. 



necessary. The programs in Tables 1 and 
2 will count to a maximum of 65535 
pulses in one one-second interval at a 
maximum rate of 500,000 Hz, the limit of 
the 6522. Note that the total counting in- 
terval ma be more or less than one se- 
cond by say ten microseconds. This error 
amounts to less than one count if the in- 
coming pulse rate is less than 65,535 Hz, 
and is of no consequence for this applica- 
tion. The listing in Table 2 is useful as a 
frequency counter with no regard to our 
frequency-to-temperature conversion pro- 
gram listed in Table 1. That is, the pro- 
gram in Table 2 is a stand-alone frequen- 
cy counting program which may be used 
to count the frequency of pulses arriving 
at PB6, provided these are TTL level 
pulses similar to those provided by the 
555 temperature-to-frequency circuit. A 
clever programmer will note that if IFR5, 
the T2 interrupt flag, is read, the T2 
counter becomes a 17 bit counter, exten- 
ding the range listed above by a factor of 
two. We did not program this feature into 
the programs in Tables 1 and 2. 

Now that you can measure temp- 
erature, let's see what interesting ap- 
plications you can come up with, and 



please let us hear from you. Of course, 
the first thing you will want to do is put 
the thermistor under your tongue and 
measure your body temperature. Analog 
Devices sells a T/F converter (AS537) that 
provides a linear relationship between T 
and F. We now describe how to interface 
it to your computer. 

The connection diagram for the AD537 
is shown in Figure 4. Again, the T2 timer/- 
counter on the 6522 is used to measure 
the frequency of the pulses coming from 



A Program to Measure Temperature with 
the AD537 Interface 



10 POKE 04,00: POKE 05,15 

20 Y = USR(0) 

30 FRQ = 256*PEEK(50) + PEEK(49) 

40 TC = (FRQ - 2731 )A0 

50 TF = TC*9/5 + 32 

60 TF = INT(TF + .5) 

70 PRINT TF; "F" ; TC; "C" 

80 GO TO 20 



the AD537. With the values shown, the 
AD537 will produce a linear relationship 
between frequency and absolute temp- 
erature (Kelvin degrees) of 10Hz/°K. At 
room temperature (about 300°K) the fre- 
quency will be 3000 Hz. The 15 k poten- 
tiometer in Figure 4 is adjusted to give 
the correct temperature. The adjustments 
are easier if the 15 k potentiometer is 
replaced by a 9.1 k resistor in series with 
a 2 k potentiometer to trim the total 
resistance to about 10 k ohms. 

To convert from absolute temperature 
(°K) to Celsius temperature, we make use 
of the formula [°C = °K - 273.1]. Then we 
can convert to Fahrenheit with the for- 
mula [°F = (°C)(9/5) + 32]. The entire pro- 
cess is handled with the BASIC program 
listed in Table 3. This program also calls 
the machine subroutine listed in Tables 1 
and 2. 

The AD537 is a versatile device. It can 
also be used as a very fine voltage-to- 
frequency converter with only a few exter- 
nal components. Analog Devices appears 
to share my philosophy that the fewer ex- 
ternal components around, the less likely 
it is for me to have problems. In any case, 
with the same integrated circuit you can 
make youself a voltmeter. The same 
machine language subroutine will provide 
the necessary software, and a simple 
BASIC calling program will place the 
decimal point and output the answer. You 
should be sure to obtain the specification 
sheets on the AD537 if you get one. They 
contain a lot of useful and vital informa- 
tion. For example, the Ad537 can be 
operated in a remote location with a two- 
wire connection. Several of them can be 
multiplexed because the pulse output pin 
is an open-collector connection. The 
AD537 is much more expensive than a 
555 timer, and jAnalog Devices may re- 
quire a minimum order. Perhaps the 
members of your computer club can get 
together and place an order. Write: 
Analog Devices, 1 Industrial Park, P.O. 
Box 280, Norwood, Ma. 02062. 

If you do not have a BASIC interpreter 
on your computer, then the machine 
language output subroutines given in 
Tables 4, 5, and 6 may be used with the 
programs in Tables 2 and 3 to output the 
frequency and temperature information. 
(Note that in order to measure temp- 
erature with the 555 timer circuit, a BASIC 
interpreter is an absolute essential.) 
SYM-1 and KIM-1 users can use the 
binary-to-BCD conversion routine in Table 
4, together with their own subroutine that 
displays six numbers on the 7-segment 
LEDs, to display the frequency of the 
pulses measured by the machine 
language program in Table 2. The JMP 
BASIC instruction at $0F37 would be 
replaced by the following instructions: 



20 60 OF 
20 ?? ?? 
4C 00 OF 



JSP, DCML 
JSR DISPLAY 
JMP START 
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where DISPLAY is the user's routine to 
display six digits. AIM 65 owners will 
want to use all the subroutines in Tables 
4, 5, and 6 to output the BCD digits 
representing the frequency to the AIM 65 
twenty character display. To use the 
subroutines with the AD537 interface and 
the program in Table 3, you must first 
subtract $0AAB (2731) from the measured 
pulse rate to convert it to Celsius, and 
then output the BCD digits, remembering 
for yourself where the decimal place is. 
Good luck. 



, + 5V 





Figure 3; Graphical Interpretation of 
Quadratic Interpolation 



Figure 4: Frequency-to-Tempera ture Con- 
version Curve for the 555 Circuit. 



Table 4. A subroutine to convert a 16-bit binary number to six BCD digits. 

$0031 = PLSLO; contains low-order byte of 16-bit number to be converted. 
$0032 = PLSHI; contains high-order byte of 16-bit number to be converted. 

Clear memory locations for the 

BCD number 



Set decimal mode for subsequent 
additions. Y contains number of 
bits to be converted. One bit of 
the number is shifted into the 
carry bit at a time. X serves as 
a counter for a triple-precision 
addition. 



Get the next bit. 

When Y = 0, the conversion is 

complete. 

Return to calling program. 



$0F60 A9 00 


DCML 


LDA $00 


0F62 85 01 




STA BCDLO 


0F64 85 02 




STA BCDMI 


OF66 85 03 




STA BCDHI 


0F68 F8 




3ED 


0F69 AO 10 




LDY $10 


0F6B 06 31 


THERE 


ASL PLSMO 


0F6D 26 32 




ROL PLSMI 


0F6F A2 FD 




LDX $FD 


0F71 B5 04 


MORE 


LDA BYT.X 


OF73 75 04 




ADC BYT.X 


OF75 95 04 




STA BYT.X 


OF77 E8 




INX 


0F78 DO F7 




BNE MORE 


0F7A 88 




DEY 


0F7B DO KE 




BNE THERE 


0F7D D8 




CLD 


0F7E 60 




RTS 
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Would You Like to 
Become a MICRO Dealer? 

MICRO is a quality 6502 magazine. 
Our current dealers report that having 
MICRO available for sale in their store 
actually helps sell 6502 based 
systems. 

We require a minimum quantity of on- 
ly 10 copies per month and we offer a 
standard trade discount. 
Other items available are the Best of 
MICRO, vols 1 and 2, and All of 
MICRO. 

If interested, please write to: 
MICRO 
P.O.Box 6502 
Chelmsford, MA 01824 
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Table 5. A subroutine to convert six BCD 
subroutine. 



digits to ASCII and call an output 



$CF80 
0FS2 
OFffl, 
0F86 
0F88 
0F8A 
0F8B 
0F8C 
0F8D 
0F8E 
0F8F 
0F91 
0F% 
0F96 
0F98 
0F9A 
0F9C 
0F9D 
0F9F 
OFAO 
0FA2 



A2 06 
A9 CO 
85 04 
A5 03 
29 FO 
4A 
4A 
4A 
AA 
16 

69 30 
20 A5 OF 
AO 04 
06 01 
26 02 
26 03 



ASCII 



NEXT 



AGN 



DO F7 
CA 

DO E4 
60 



UK $06 
LDA $00 
STA LOC 
LDA BCDHI 
AND $F0 
LSR A 
LSR A 
LSR A 
LSR A 
CLC 

ADC $30 
JSR OUTCH 
LDY $04 
ASL BCDLO 
ROL BCDMI 
ROL BCDHI 
DEY 

BNE AGN 
DEC 

BNE NEXT 
RTS 



X contains the number of BCD digits. 
Our out-character (OUTCH) subroutine 
requires LOC to start at $00. 
Get the most-significant nibble 
of the BCD number. The BCD digits 
will be output from the most- 
significant to the least significant. 
Move high-order nibble to the low- 
order nibble. 

Adding $30 to a BCD digit converts 
it to ASCII. Output the character. 
Get another nibble. 



Get another digit? 

Yes. 

No. 



Table 6. 



A subroutine to disnlay six dioits on the AI" 65 display. 



S0FA5 09 80 
$0FA7 85 05 
$0FA9 SA 
SOFAA 48 
SOFAB A6 14 
SOFAD A5 15 
SOFAF 20 7B EF 
S0FB2 F6 04 
SDFB4 A5 (14 
SIFBfi C« Ofi 
STFE8 00 04 
SOFBA A9 00 
SOFBC 35 04 
S1FBE 68 
SOFBF AA 
50FC0 60 



OUTCH 


ORA $80 




STA TEMP 




TXA 




PHA 




LDX LOC 




LOA TEMP 




JSR 0UTDD1 




INC LOC 




LDA LOC 




CMP SOfi 




BCC AHEAD 




LDA $00 




STA LOC 


AHEAD 


PLA 




TAX 




RTS 



ASCII character is in the accumulator. 
Set bit seven and store temporarily. 
Save X. 

LOC contains location of the digit 
on the 21 character display 
Use AIM 65 nonitor routine. 



Have all six characters been outnut? 

Yes. Clear LOC. 

Get X back. 

Return to the calling routine. 



Advertise With Us 



We have just put together a new 
Media Package. It includes all 
I that you need to know about 
I rates, sizes, and placement. 

Also included is information on 
| color ads, which will be available 
next month, in our June issue. We 
give you all the specifications that 
you need to know about nega- 
tives, color separation, insertions, 
I etc. 

We also give you information 
on contracts and ad placement, 
| typesetting, and artwork. 

Write today for our new Media 
Package. The address is: 

Advertising Dept 
MICRO 
Box 6502 
Chelmsford, MA 01824 

or call and ask for Terry, Cathi, or 
Mary. All three are ready to help 
you design a sharp looking ad. Br- 
I ing your ad to us, and we'll do the 
rest to bring it to the world of 
microcomputing. Our number is 
(617) 256-5515. 



APPLE ANALOG INPUT 

Analog to Digital Conversion System for the APPLE Computer 



iRM 



Jj 



Glue your APPLE computer the 
aoility to measure and control the 
Norld around It with pMAC SYSTEMS 
modules. Just plug the APSETI Into 
your APPLE to get 1 6 channels of 
analog input. Screw terminals are 
provided for each channel so vou can 
hook up pots. Joysticks, thermometers, 
light probes, or whatever appropriate 
sensors you have. 

Each of the 16 analog inputs. In 
the range of to 5.I2 volts. Is 
converted to a number between and 
255 120 millivolts per count). 

Software Is Included. 




I -AIM! 6 



APSETI 
- U ANALOG INPUTS • 8 BITS 100 MICROS£C 



1-APMOO - APPLE TOllMAC INTERFACE 

t-CABt-E A2« - 2* INCH INTERCONNECT CABLE 

I-MANMOD1 

t-POWl -POWERMOOULE 

APSETI o for HO VAC $293 
APSETI. lor 230 VAC t SOS 

CONNECTICUT microCOMPUTER, Inc. 

750 POCONO ROAD 

BROOKFiELD, CONNECTICUT 0S804 

TEL: (203) 775-9659 TWX: 710-456-0052 

VISA AND M/C ACCEPTEO-SENO ACCOUNT NUMBER, EXPIRATION DATE AND SIGN ORDER. 

AOO 51 PER OROER FOR SHIPPING a HANDLING -FOREIGN ORDERS ADO 10% FOR AIR POSTAGE. 



OSI OS! 

SOFTWARE 

FOR 

OHIO SCIENTIFIC 

Over 50 programs lor 01, C2, C4 & Superboard.'on tape and disk. All 
come with listings and compete documentation. 



$19.95 
5.95 



5.95 



GAMES - 4K - Tap* 

CHESS FOR OSI - 

specify system 

STARFIGHTER 

Real time space war. 

SEAWOLFE 

Floating mines, three 

target ships, etc. 

LUNAR LANDER 

With full graphics 

TEN TANK BLITZ 

A sophisticated real time 

tank game. 

8K GAMES 

BACKGAMMON 

BLACKJACK 

Plays all Vegas rules 

Add $1.00 each for Color/Sound 



5.95 



9.95 



9.95 
6.95 



UTILITIES 

C1P CURSOR CONTROL $9.95 
gives real backspace, one key 
screen clear, and midline editing 
RENUMBERER 5.95 

SUPERUTILITY 12.95 

Has Renumberer, Variable table 
maker and Search 
BUSINESS 

SMALL BUSINESS ANALYSIS 15.95 
Does profit and loss, quick ratio, 
breakeven analysis and more. 13 
pages of documentation. 
STOCK PORTFOLIO 6.95 

Keeps track of your Investments 



Our $1.00 catalog has free game 
and utility listings, programming 
hints and a lot of PEEKs and 
POKEs and other stuff that OSI 
forgot to mention - and a lot more 
programs for sale. 



DISKS 5" COLOR/SOUND $29.95 
DISK 1. STARFIGHTER, ROBO- 
TANK, SEA WOLFE, BOMBER, 
TEN TANK BLITZ 
DISK 2 BREAK THROUGH, LUNAR 
LANDER, ALIEN INVADER, KILL- 
ERROBOTS, SLASHBALL 



AARDVARK 

1690 Bolton, Walled Lake, Michigan 48088 • (313) 624-6316 



DISCOUNT DATA PRODUCTS 

BASF 5V DISKETTES: 
$34.50 PER BOX OF 10 

HIGHEST QUALITY DISKETTES AT A 
BARGAIN PRICE! LABELS AND WRITE- 
P ROTECT TABS INCLUDED. 

VINYL DISKETTE HOLDERS 
FOR NOTEBOOKS 

THE IDEAL WAY TO STORE DISKETTES. EACH 
VINYL PAGE HOLDS TWO DISKETTES AND IN- 
CLUDES A POCKET FOR EACH DISKETTE'S LABEL. 
SAFELY KEEP UP TO 40 DISKETTES IN A SINGLE 
V3-RING NOTEBOOK! 

$4.95/SET OF 10 



. 



«IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIWIII«|l»l««*«IWI*l«l«* 
6502 ENTHUSIASTS 

1 A NEW KIT THAT GETS YOU INTO 

5 SERIOUS MICROCOMPUTING FOR ONLY 5 



= $14.95 Kit 



$16.95 Assembled = 



5 > 



6502 CPU & DISK CONTROLLER CARD 

16K RAM CARD 

90K MINIFLOPPY DISK DRIVE 

DOS, 8K BASIC, ASSEMBLER/EDITOR 

8 SLOT MOTHERBOARD 

CHASSIS, POWER SUPPLY, & CABLES 

MICRO— TERM ACT— I SERIAL TERMINAL 

16 X 64 CHARACTER DISPLAY 

Upper/Lower CASE 

ADDRESSABLE CURSOR 
GOLDSTAR TV/MONITOR 

HIGH QUALITY DISPLAY 
^^ TV TUNER INTACT 

TeH- 
Aids -m 



Master Charge 

VISA 

C.O.D. 



= Industries Inc. 



= New Dimensions In Electronics 

3 44 Univenity Drive • Arlington Heights. III. 60004 • (312) 870-7400 ^ 

SlllllllI!IIIHIIIIII!lllllJIIIIIIIIIllllllllllllllllllllllllllHIIHI«l»l'H ||l,lll,l " B 



MARKETING YOUR OWN SOFTWARE? 
DDP OFFERS DEALER & SOFTWARE HOUSE 
DISCOUNTS ON NOT ONLY THE ABOVE 
ITEMS, BUT ALSO THE FOLLOWING 
PRODUCTS: 

9" x 12" ZIP-LOCK BAGS FOR PACKAGING & 
DISPLAY OF SOFTWARE. 
CORRAGATED MAILERS TO SHIP TO USERS 
OR DEALERS! 
SEND FOR FREE INFORMATION AT: 

DISCOUNT DATA PRODUCTS 

P.O. BOX 19674-M 

SAN DIEGO. 92119 

(ADD S1 00 SHIPPING/HANDLING CHARGE TO ALL ORDERS) 



OHIO SCIENTIFIC 



Hardware..C1 P Video— gives true 32 or 64 chrs/line 
with guard bands. This is not a make-shift mod. It 
makes your video every bit as good as the 4P's plus 
you have switch selectable 1,2 and 3 MHz. CPU clock 
as well as 300, 600 and 1200 baud for cassette and 
serial port all crystal controlled. 

Complete plans— $18.95, Kit $13.95 or send in your 
C1P to Personal & Business Computer Connection, 
38437 Grand River, Farmington Hills, Mich 48018, and 
we will install the Video mod for $79.95. Other mods 
available..add sound; RS-232 port cassette motor con- 
trol. 

Software (with documentation) For CI, C2, 4P & 8P 
Chess 1.9, Backgammon, excellent card games, ar- 
cade type games, utility programs, mini word pro 
cessor memory maps, etc. 

Catalog with free program (hard copy) & memory map 
for BASIC in ROM models...$1.00 

Progressive Computing 

3336 Avondale Crt. 

Windsor, Ontario 

CANADA N9E 1X6 

(516)969-2500 



Shorthand Commands for Superboard II and 
1 Challenger C1P BASICS 



This article shows how to intercept the BASIC'S input 
routine and how to implement a shorthand notation. 



Henk J. Wevers 
Cloeckendaal 38 

6715 JH EDE 
The Netherlands 



* 



As a superboard or Challenger IP 
owner, you surely have noticed the large 
amount of adds for extra software for the 
Apple, PET and TRS 80 machines and you 
hoped for just some of these goodies to 
show up for your own computer. 

Well, no such luck, so far. So, now we 
have to do the job ourselves. One of the 
advertised options for the TRS 80, single 
stroke instructions, looked nice and I 
started to program something like that 
for the OSI machine. The result is 
presented here, and the shorthand 
routine is almost alway present in my 
machine during program development. 

Before describing how the job was 
done, let's first have a look at what this 
routine does exactly. After loading the 
program, type 

POKE 536,34:POKE 537,2 
and instead of typing the instruction let- 
ter by letter, you can enter it by hitting the 
ESCAPE KEY and another key after that. 
The last key determines which instructin 
is entered. For instance, if you want to 
enter RIGHTS, hit the ESCAPE key first. 
On the display the cursor will change to 
an arrow to warn you that the next entry 
will be an instruction instead of a single 
character. Now hit C and you have just 
entered RIGHTS as the display shows 
you. 

All instructions are accessible in this 
way, and by altering the table in memory 
locations 0280 through 02C3 you may 
even choose your own shorthand codes. 

There are a few things about the 
Microsoft Basic for the OSI machines 
that should be known before you can fully 
understand the program. 

First, if Basic asks for an input, the in- 
put routine is accessed by a vector 
located in memory locations 0218 and 
0219 (hexi or 536 and 537 decimal. You 
can intercept the input by changing xnese 
locations and so routing the input 



through your own routines, and that is the 
way I did the job. 

Secondly, to use the token system in 
their Basic, Microsoft put a table contain- 
ing all possible instruction in their pro- 
gram starting at location A084 hex. The 
instructions are separated in the table by 
the last character of ever instruction hav- 
ing bit 7 set. If you strip off bit 7 of the 
token, you have the relative position of 
the instruction in the table. If we look at 
the instruction END with token 80, then 
tjhis one has the first position in the table 
(actuaily-fiositjon 0, since we count from 
zero). RIGHTS with Token C3 (hex) has the 
hex position of 43 in the table. 

Third to consider is that the input buffer 
is located at hex location 13 and up in 
page zero. X serves as the buffer pointer 
during input. 

And lastly, location 0200 is used as the 
relative cursor location. The routine 
WRCHAR at BFC2 puts the character in 
location 0201 on the screen, at location 
D300 + the contents of 0200. You can 
use this in your own programs; I found it 
very handy. Now to the program. Most of 
it will be clear to you now. 

First a character from the keyboard or 
cassetport is input, and if it is not 
'ESCAPE' we return it to the A register. 
Basic can't tell the difference between 
this routine and the original one. If the 
character is 'ESCAPE', the cursor is 
changed from underline to right arrow 
and another character is input. The shor- 
thand table (0280 through 02C3) is scann- 
ed for a match, and if a match is found, 
the X register will contain the token for 
that command with bit 7 stripped off. If 
no match is found another (shorthand) 
character is input. The start of the in- 
struction is searched for in the Basic 
tabie and then the instruction is output to 
the screen and stored in the input buffer, 
character by character. If bit 7 of a 
character is set, (signaling the end of the 
instruction) mis process is stopped, bit 7 
stripped off and the last character pro- 



cessed. Another character or shorthand 
command can then be input. 

By now you have noticed the strange 
BIT S07A9 instruction around locations 
0263 and 0274. It is a short way of enter- 
ing a routine with different contents of 
the accumulator. For instance, if you 
enter the OUTCH routine via locations 
0262 - 0263 - 0266, you have the character 
in A output, but entering the routine via 
0264-0266 you have the 'BELL' character 
in A and so output. 025E and 026F switch 
between the two, depending on the input 
buffer being full. 

Now let's look at the shorthand table 
starting at location 0280. The last two 
characters of the addresses also give the 
token for the instruction. I have program- 
med this table for you in a way that I have 
found convenient for the location of the 
shorthand commands on the keyboard. If 
you want to program this layout yourself, 
just enter the ASCII value in the table for 
the shorthand key you want. For example, 
if you want the Q-key to be shorthand for 
'THEN', only put 51, the ASCII code for Q, 
in location 02A0, the location for 'THEN'. 

The last thing to explain is the choice 
of where to put this routine in memory. I 
used locations 0222 and up, because 
these locations are unused by BASIC and 
the monitor, and they are not affect by 
either a cold or a warm start. If you have 
hit the BREAK key you ha>"» *" ~ h *nne 
the input vector again by proper POKINU 
as described earlier. 

I hope this little routine will make pro- 
gramming a little easier for you as it did 
for me. Imagine being able to RUN, LIST, 
SAVE, and LOAD with one simple key- 
stroke! Most likely, you have exceeded 
the maximum line length by using a ? in- 
stead of PRINT, so you had to type the 
line all over again after a list, because the 
program wouldn't load. This routine 
shows PRINT on the screen after 
'ESCAPE' and ? so you will always see 
what you are doing. Good luck! 
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Second part of Memloc is taken for command in that 
location. 



II EM LOG 


COMMAND 


SHORTHAND 


CODE(HEX) 


02A2 


STEP 


E 


45 


0280 


END 


H 


48 


02A3 


♦ 


+ 


2B 


0281 


FOR 


Q 


51 


02A4 


- 


- 


2D 


0282 


NEXT 


G 


47 


02A5 


a 


a 


2A 


0283 


DATA 





4P 


02A6 


/ 


/ 


2F 


0284 


INPUT 


I 


49 


02A7 


*» 


m 


5E 


0285 


DIM 


J 


4A 


02A8 


AND 


5 


35 


0286 


READ 


U 


55 


02A9 


OR 


% 


25 


0287 


LET 


f 

• 


21 


02AA 


> 


> 


3E 


0288 


GOTO 


R 


52 


02AB 


m 


■ 


3D 


0289 


RUN 


•CR' 


OD 


02AC 


< 


< 


3C 


028A 


IP 


D 


44 


02AD 


SON 


( 


28 


028C 


GOSUB 


T 


54 


02AE 


INT 


6- 


36 


028D 


RETURN 


Y 


59 


02AP 


A3S 


& 


26 


028E 


REM 


M 


22 


02BD 


USR 


• 


27 


028P 


STOP 


*G 


07 


02P1 


ERE 


7 


37 


0290 


ON 


• 
• 


3A 


02B2 


POS 


8 


38 


0291 


NULL 


~E 


05 


• 2B3 


SQR 


9 


39 


0292 


WAIT 


'A 


01 


02B4 


RND 





30 


0293 


LOAD 


L 


4C 


02B5L0G 


LOG 


$ 


24 


0294 


SAVE 


K 


4B 


02B6 


EXP 


4 


34 


0295 


DEP 


-D 


04 


02B7 


COS 


2 


32 


0296 


POKE 


A 


41 


02B8 


SIN 


1 


31 


0297 


PRINT 


? 


3F 


• 2B9 


TAN 


3 


33 


0298 


CONT 


~B 


02 


02BA 


ATN 


•# 


23 


0299 


LIST 


•RUBOUT' 


7F 


02BB 


PEEK 


s 


53 


029A 


CLEAR 


*fl 


03 


02BC 


LEN 


M 


40 


029B 


NEW 


•LP' 


OA 


02BD 


STRS 


B 


42 


029C 


TAB( 


• 


2E 


02BE 


VAL 


» 


2C 


029D 


TO 


W 


55 


• 2BF 


ASC 


N 


4E 


029E 


FN 


-P 


06 


0280 


CHH$ 


V 


56 


029P 


SPC( 


J 


3B 


02C1 


LEFTS 


z 


5A 


02A0 


THEN 


P 


46 


02C2 


MIGHTS 


C 


43 


02A1 


NOT 


) 


29 


02C3 


MID* 


X 


58 
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% 



* 



. 



9222 


20 BA 


FF 


SH0RT1 


JSK 


IN 


0825 


C9 IB 






CMPIK *1B 


0227 


FO 01 






beo. 


SHORT* 


0229 


60 






KTS 




022A 


98 




SH0KT2 


TYA 




022B 


48 






PHA 




022C 


6A 






TXA 




022D 


48 






PHA 




022S 


A9 12 






LDAIU 


SI 2 


02J0 


8C ol 


02 




STA 


CURSOR 


02}} 


20 C2 


BP 




JSH 


WilCHAR 


02}6 


A2 4} 




SHORT} 


LDX1U 


34} 


02}8 


20 BA 


PP 




JSK IN 


02JB 


dd so 


02 


SH0HT4 


CKPX 


TABLE 


02}E 


fo 06 






BEO. 


SH0HT5 


0240 


CA 






DEX 




02/11 


10 F8 






BPL 


SH0RT4 


024} 


4C }6 


02 




JL'.P 


SHORT} 


0246 


Eii 




SH0KI5 


I NX 




0247 


A0 FP 






LDYIU 


SFF 


0249 


CA 




SH0RT6 


DEX 




024A 


FO 08 






BE4 


SHORTS 


024C 


C8 




SH0RT7 


INY 




0243 


B9 84 


AO 




LDAY 


SA084.Y 


0250 


10 FA 






BPL 


SHORT 7 


0252 


}0 F5 






BMI 


SH0RT6 


0254 


68 




SH0KT8 


PLA 




0255 


AA 






TAX 




0256 


C8 




SH0RT9 


INY 




0257 


S9 84 


AO 




LDA $A084,Y 


025A 


}0 OF 






BUI 


SH0HT10 


025C 


EO 47 






CPXIlt S47 


025E 


BO 04 






BCS 


♦04 


0260 


95 1} 






STAX 


$1} 


0262 


E8 






INX 




026} 


2C A-9 


07 


SH0HT9A 


BIT 


807A9 


0266 


20 E5 


A8 




J Sri 


OUTCH 


0269 


DO EB 






BUE 


S.10KT9 


02'6B 


29 7F 




SH0RT10 


ANSI! 


S7F 


026D 


EO 47 






CPXH 


*47 


026F 


BO 04 






BCS 


♦ 04 


0271 


95 1} 






STAX 


SI} 


0275 


£8 






INX 




0274 


2C A9 


07 




BIT 


S07*9 


0277 


20 E5 


A8 




JSK 


OUTCH 


027A 


68 






PLA 




027B 


A8 






TAY 




027C 


4C 22 


02 




JIIP 


SHORT 1 



INPUT CHAH FKOH KEYB. OR TAPE 

la IJ 'ESCAPE' ? 

YES? BRANCH 

MO, HETUHN TO BASIC "I™ ICHAR 

SAVE Y 

AND 

X REGISTERS 

LOAD 'ARROW' TO 

CHANCE CURSOR 

DO IT 

LOAD UAX TABLE INDEX 

INPUT SHOHTHAMJCOKMAND 

COMPARE WITH TABLE 

FOUND IT? BRANCH 

DECR^XEHT INDEX FOR NEXT TnY 

IF NOT DOSE? L^OP BACK 

110 HATCH? IGNORE AN* LOOP BACK 

COUE HERE WITH TABLE INDEX IN > 

PREPARE FOR LOOKUP IN C0U1U1ID 1 

COi-iMAND FOUND? 

YES? BRANCH 

NO SKIP CURRENT COUHAND IN TaBL 

DONE YET? 

NO, LOOP BACK 

Y.2S? GO AND TRY NEXT ITEM 

CET INFUTBUFFEH INDEX BACK 

AND STOKE IT IN X .tEG 

GET READY TO STORE COkJAND IN B 

GET COMMAND CHAR 

IF LAST CHAR OF COIUl, BRANCH 

INPUT3UFFER FULL? 

YES? BRANCH TO SH0RT9A ♦ 1 

STORK CHAH IN INPUTBUFFEH 

I11CR. BUFFERFOINTER 

SKIP OR LOAD 'BELL' IN A 

OUTPUT CHAR 

BRANCH ALWAYS 

LAST CHAR. STRIP OF HIGH BIT 

INPUTBUFFER FULL? 

YES, BRANCH 

STORE CHAR IN INPUTBUFFER 

INCH BUFFEHP01HTER 

SKIP OH LOAD 'BELL' IN A 

OUTPUT CHAR 

RESTORE 

Y REGISTER AHD 

LOOP BACK 



0280 - &2CJ 



TABLE 



POKE 5}6,}4:POKE 5}7,2 PUTS SHORTHAND ON AND 
POKE 5 }6, 186: POKE 557,255 OFF 



100 % PET disk oriented Macro 
Assmblr/Text Editor (MAE) 
Development software. Includes 
new version of ASSM/TED written 
for 32K new ROM PET & 2040 disk 
drive. Features macros, condi- 
tional and interactive assmbly, a 
relocating loader program. $169.95 
for diskette and manual. Send 
$1.00 for details. 

Eastern House Software 

3239 Linda Drive 

Winston-Salem, NC 27106 



British APPLE Owners/Dealers! 
Write now to MGA for extensive list 
of specialized software and hard- 
ware for your APPLE or 2020. We 
promise you'll be surprised! 

140 High Street 

Tenterden, Great Britain 

TN306HT 
05— 65D V3 Complete disassembl- 
ed listing, fully commented, 
everything you always wanted to 
know but OSI wouldn't tell you. 
$19.95 

Software Consultants 

7053 Rose Trail 

Memphis, TN 38134 



Classified Ads 



OSI Superboard C1P Club Interna- 
tional is oriented to your system. 
Join US, Canada, Europe & get 
giant manthly newsletter. All 
members MUST send at least 1 ap- 
plication, modification or 
Basic/Machine lang program + 
$12. US money order for yearly 
membrshp to: 

S-BD C1P Club International 
Bx 55, Agincourt, Ont. 
CANADA MIS 3B4 

APPLE GRAPHICS Tablet fill PGM 
Solid color fill of shapes. 1 pen 
press fills most shapes greater 
than 14 pixels wide. Reg. tablet, 
48K, disk. $25 for pgm disk & in- 
structions. 

Dave McKee 

10205 Rock Circle Dr. 

Edmond, OK 73034 

OSI: C1P8K $375, C4P8K $659, 610 
board $288, C1P/C4P disk drive 
$479, 4K 2114 memory $58, other 
OSI available. Centronics 730 
printer, 50 cps 80 col. tractor & 
platen feed only $875. Add shipp- 
ing, personal checks take 3 wks to 
clear. 

TRACK ZERO 

1418 Hanson Drive 

Normal IL 61761 



MAJOR LEAGUE BASEBALL! 
Manage Major League baseball 
teams and make all decisions; in- 
cluding pitching, hitting, running 
and lineup changes. Includes data 
files on all 1979 teams and utility 
programs to create and edit your 
own team files. HIRES display. Ap- 
ple II with 48K ROM Applesoft, Disk 
$25. 

Stan Erwin 

5410 W 20th St. 

Indianapolis, IN 46224 

OSI C1P Superboard II owners, you 
need the 96 page tutorial manual 
'Getting Started with Your C1P'. 
Fundamentals of BASIC, cassette 
usage, subroutines, logic & control 
are described in step-by-step man- 
ner. $5.95 + $1 p&h form: 

TIS 

Box 921— M 

Los Alamos, NM 87544 
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PERFECT AIM 




ATTRACTIVE FUNCTIONAL PACKAGING 
FOR YOUR AIM-65 MICROCOMPUTER 

• Professional Appearance 

• Striking Grey and Black 
Color Combination 

• Protects Vital Components 



ENGINEERED SPECIFICALLY FOR 
THE ROCKWELL AIM-65 

• All Switches Accessible 

• Integral Reset Button 
Actuator 

• Easy Paper Tape Replacement 

EASILY ASSEMBLED 

• Absolutely No Alteration 
of AIM-65 Required 

• All Fasteners Provided 

• Goes Together in Minutes 



MADE OF HIGH IMPACT STRENGTH 
THERMOFORMED PLASTIC 

• Kydex 100* 

• Durable 

• Molded-ln Color 

• Non-Conductive 

AVAILABLE FROM STOCK 

• Allow Three to Four Weeks 
for Processing and Delivery 

• No COD's Please 

• Dealer Inquiries Invited 



TO ORDER: 1 . Fill in this Coupon (Print or Type Please) 

2. Attach Check or Money Order and Mail to: 



NAME 



STREET . 
CITY 



STATE . 
SAE1-1 



PLEASE SHIP PREPAID 
@ $43.50 each 



California Residents Please Pay 
$46.33 (Includes Sales Tax) 

SAE1-2 PLEASE SHIP PREPAID 

@ $46.50 each 

California Residents Please Pay 
$49.52 (Includes Sales Tax) 



.ZIP 



SAEM(s) 



enclosures 
group 

771 bush street 

san francisco, California 94108 



SAE 1-2(s) 



•TM Rohm & Hass Patent Applied For 



- A Formatted Dump Routine for the AIM 65 



• 



This HEX dump utility permits the user to control the 
formatting of the dump to conform to his printer's 
capabilities. 



The Dump routine in the AIM 65 
Monitor produces a continuous character 
string and thus is not very readable. The 
dump format is essentially not tit for 
human consumption. The serious AIM 65 
user who needs a memory dump is thus 
limited to using the Monitor "M" com- 
mand, which only dumps four locations 
at a time. A more useful and efficient 
dump routine with a variable output for- 
mat was needed by the author and thus 
the following program was written. 

The Formatted Dump routine will dump 
memory over the range specified in 
response to the "FROM = " and "TO = " 
parameters. The number of bytes in each 
line of the dump is specified in response 
to "/". All input and output is in hex- 
idecimal. Each line of the dump gives the 
starting address of the first byte in the 
line, a space, 1st byte, space, 2nd byte, 
etc. The standard AIM-65 printer will han- 
dle $05 bytes per line and an 80 column 
TTY type unit will handle up to $16 (22) 
bytes per line. 

The dump routine makes extensive use 
of the routines in the AIM-65 Monitor as 
well as RAM locations reserved for the 
Monitor. No locations outside of the 
Monitor area, except for the dump routine 
itself, are used by the dump routine. Thus 
the dump routine may be located at any 
convenient place in RAM and will not af- 
fect any other software. The following 
dumps demonstrate the use of the 
routine. 

AIM-65 MONITOR ROUTINES USED IN 
DUMP PROGRAM 

E7A3 = Print "FROM = " and get address 
in $A41C/D. 

E83E = Print " " (blank). 
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E910 = Move address from $A41C/D to 
$A41AB. 

E7A7 = Print "TO = " and get address in 
A41C/D. 

E837 = Print "/". 

E785 = Get two hex digits and store in 
A419. 

EA13 = Print "CRLF". 

EA46 = Print one hex byte = Two ASCII 
characters. 

EB58 = LDAY - Simulates LDA (N), Y 
without page 0. 

E182 = AIM-65 Monitor Re-entry. 



A Formatted Dump Routine for the 

AIM-65 

List 1 



0112 4€ JMP OF90 



0F90 20 JSR E7A3 

0F93 BO BCS 0F90 

OF 95 20 .J BR L83E 

OF 9 8 20 J BR F 9:1.0 

0F9B 20 JSR F.7A7 

0F9E BO BCS 0F9B 

OFAO 20 ..JSR E83E 

OF A3 20 JSR E837 
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Washungton State U. 

Pullman, WA 99164 



0FA6 


20 


JSR 


E785 


OFA9 


20 


JSR 


EA13 


OF AC 


A 30 


Lit A 


A41C 


OFAF 


38 


SEC 




OFBO 


ED 


SBC 


A 41 A 


0FB3 


48 


PHA 




0FB4 


AD 


LDA 


A 4 ID 


0FB7 


ED 


SBC 


A41B 


OFBA 


30 


BMI 


OFF 6 


OFBC 


DO 


BHE 


OFCl 


OFBE 


'..."..J 


PI... A 




OFBF 


FO 


BEQ 


OFF 6 


OFCl 


AD 


LDA 


A 4 IB 


0FC4 


20 


■JSR 


EA46 


0FC7 


AD 


1 DA 


A 41 A 


OFCA 


20 


■JSR 


EA46 


OF CD 


AE 


LDX 


A 4 19 


OF" DO 


AO 


I...DY 


#00 


0FD2 


2.0 


JSR 


E83E 


0FD5 


n r 


LDA 


* 1 A 


0FD7 


20 


■JSR 


EB5S 


OFDA 


20 


•JSR 


Eft 4 6 


OF DO 


C8 


I NY 




OFDE 


CA 


DEX 




OFBF 


DO 


BNE 


0FD2 


0FE1 


20 


JSR 


EA13 


0FE4 


AD 


LDA 


A419 


0FE7 


18 


CLC 




0FE8 


6 D 


ADC 


A41A 


OFEB 


8D 


ST A 


A41 A 


OFEE 


90 


BCC 


0FF3 


OFFO 


EE 


IMC 


A41B 


OFF 3 


4C 


■JMP 


OF AC 


OFF 6 


4C 


JMP 


El 82 
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RUN 

FORMATTED DUMP ROUTINE FOR THE AXM*=6E 

ENTER VIA F3 FUNCTION KEY »1 

s p e c :i: fy : f r o m « v to « » • ~ < c i-i R s / 1... in e > 
c i-i R s / 1... :i: N e * tw o ii e x q :i: g :i: t s 

<i > FROM— ISO 00 TO ■■■■■ BO 20 /OS 



B 


4C 


A3 


CE 


4C 


7F 


BOO' j 


B2 


FE 


BE 


D :l. 


CO 


BOO A 


5U 


BA 


5B 


B5 


FF 


BO OF 


BA 


A A 


B7 


BB 


B9 


BO 14 


D9 


BB 


EF 


B9 


13 


BO .1.9 


B8 


13 


B7 


EB 


BA 


BO IE 


96 


B7 


30 


BA 


FA 



f>FROM™B000 TO--B020 /O'S 



BO 00 


4C 


A3 CE 4C 7F B2 FE BE 










BO 08 


D:l. 


CO SO BA 5B BS FE BA 










BO 10 


A A 


B7 BB B9 D9 BD EF B9 










BO 18 


:i. 3 


B8 13 B7 EB BA 9 A B7 










<t>FI 


'<0H- 


-BO 00 TO --BO 20 7:1.0 










BO 


4C 


A3 CE 4C 7F B2 FE BE Dl 


CO 


50 BA 


SB BS 


FF BA 


BO 10 


A A 


B7 BB B9 D9 BD EF B9 13 


B8 


13 B7 


EB BA 


9 A B7 



* DISCOVER 6502 POWER * 
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HELP!! 

9 Super utility programs lor all AIM 65 programmers HEX INPUT: Long ana 
shoriversions used lor entering hex bytesmto memory DUMP* HEXOUT: 
Print Out your memory in two tO'maiS <0' easy Checking or location ot 
individual bytes FIELD SORT: A field sorting routine that finds usage In 
many tasks including helping you organize your programming RESTORE: 
A program which automatically restores your editor after you ve re-cnlered it 
improperly Thishasbeen a real timesaver tor us ONE STEP: Allows you lo 
step thru Ihe disassembly |Kl<slmg> one line a! a i -»p SYMBOLTABLE: l$ 
fo> use with the assembler ROM (How can you do without one 7 ) It prints the 
beginning and ending addresses oi your Symbol table along with each label m 
your program and us address, all m a handy formal RELOCATE: is a 
powerful program which allows you lo move o' relocate o'ograms 0' data m 
memory All who write, adapt or pirate programs or subroutines «v ■ appreciate 
this It allows you to place them wherever you'd like You can even open 
spaces right in the middle of a program for inserting missing new 
additional data o- instructions A programmers dream 



GAIMS PAK I 
S Exciting games of skill lor 1 or several players using the tu" capabilities o' 
the AIM 65 keyboard, display, and printer HANGMAN: A challenging word 
game tor 2 players The AIM does the work and keeps scoie SCORE 4: A 
challenging game m 3 dimensions The printer shows the positions of the 2 
players after each move REACT: Your reflexes are tested m thousandths ot a 
second The display and keyboard are turned into a reaction timer GOL- 
LUMS CAVERNS: Places you into the underground kingdom of tie evil 
Wizard You must move thru secrel tunnels and cavern rooms avoiding traps, 
mysterious mist, and the Wizard's spell To capture the Wizard you have only a 
lew poison darts and your Magic compuler to warn you when Evil is near 
BIN HEX: Teaches and tests your ability to convert Binary numbers mtoihC" 
Hexadecimal equivalents Fun for budding programmers, and helps you to 
perfect a needed skill for last and efficient programming 
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MATH 

6 Programsdealmg with numbers* math a the AIM 65 ADD & SUBTRACT: 
This powerful utility program turns your AIM 6S into a multiple precision 
calculator TOTAL: Adds up to four decimal or hexadecimal numbers at a 
time TEST MEMORY: lets you really Check oul your RAM memory 
FIBBONACCI: You learn about these .mportanl numbers as your AIM 
generates mem in a series DEC TO HEX: a muHi-u$e program and 
algorithm tor changing decimal numbers into (heir hex equivalents TIMER: 
Makes your AIM 65 into a timer or a 1 2or 24 hour clock, displaying or printing 
hours, minutes and seconds A super demo of the power of the AIM 65 



YOU CAN NOW DEMON- 
STRATE THE POWER OF 
YOUR AIM 65 WITH CYBER- 
DYNES DYNAMIC ACTION 
SOFTWARE. ALL OF OUR 
PROGRAMS RUN ON 1K OR 
4K AIMS. ALL SOFTWARE ON 
EZ-LOAD TAPE CASSETTES. 
COMPLETE TEXT, PROGRAM, 
& LOADING INSTRUCTIONS 
ARE INCLUDED. 



"TAKE AIM" MANUAL, VOL I 

by JAMES HOYT CLARK of 
CYBERDYNE'S staff, coming 
soon — watch for it or write for 
info. A guide for all. Master 
AIM 65 hardware & software. 
A lab and learning manual, 
extension, clarification, & index 
to AIM 65 documentation. Over 
30 programs. Explained & fully 
documented (games, math, 
utility, printer, display. & more). 



HOT LINE!! 
[801) 224-2745 



GAIMS PAK II 

6 Valuepackedgamesol skill and chance at less than Si 75each Created for 
maximum on ( oyment of the AIM 65 by you and others BRICKS: This 
program is unique because it learns from your mistakes and successes, while 
you play It actually becomes' smarter as you and the computer compete in a 
series of games A real challenge to your skills of logic deduction, and 
memory TIC-TAC-TOE: Need we say more than the AIM 65 «S a lair and 
imparlialscorekeepcr CARDS: Gives you practice m when to hold-em and 
when to fotd-em as your AIM 65 deals 5 CARD STUD from an unmarked and 
randomly shuttled deck LOGICAL ORDER: Tests yourskillsasa Master- 
Mmd of reason and logic as you try to deduce a random 4 number sequence in 
the fewest number of tries STARWAY 090: Places you at the controls of a 
crippled spacecraft You must Successfully pilot your craft back lo the 
mothership tor a soft rendezvous You* supply of fuel is limited ana must be 
used withcarotoavoid disaster ESP: Even computers can have ESP (or seem 
toi You mentally pick a number, answer a few questions (without disclosing 
berj. and your AIM 65_will guess me number correctly every time 



SHOW OFF 

7 Programs (less than Si 50each) which showoll all the features of ihe AIM 65 
SIGNS: Lets you print 2 sizes of letters edgewise on the AIM 65 printer & 
makelarge banners ROTATING BILLBOARD: Shows you' messages as 
ihey rotate along the display PRINTER WAVE: A good demo of usei 
control of Ihe AIM 65 printer Starls you into graphics printing PAPER 
ADVANCE: Gives you sottware control Of the printer paper advance See 
those last few unes printed for a change LINE FEED: This time it is hardware 
control of the paper advance CURSOR DEMO: You can hgtit ail 16 
segments ol the displays or type in different display patterns KEYBOARD 
INTERRUPT: Gives you hardware conirol of the keyboard Scans the 
keyboard lor key Closures without interrupting program execution ALL 
PROGRAMSmlhis section may be used m your own programs as subroutines 
0' run on their own as demos F a ii ms>ruct>ons included 



AIM 65 & 6502 RELATED PRODUCTS 

l/O-TTY-CASSETTE connector board for the AIM65 Plugs directly to AIM 65 
appconneclor (J1) Includes AIM connector TTY and recorder jacks, cable 
set tor l recorder. PC board with traces & holes for LEO indicators, switch 
input sensors opto-solators drivers, relays, aud o amp & AIM 65 1 O training 
course with software aim rO BOARD-Kii S19 75 Assembled $2? '5 



CYBERDYNES 1980 CATALOG. HARDWARE SOFTWARE BOOKS 
TRAINING ITEMS GOODIES « R&D Services (FULL DESCRIPTIONS) 
St 00 (REFUNDABLE ON FIRST ORDERl-FREE WITH ORDER. 



ORDER 
NOW! 



ORDER BY ITEM NAME AND PRICE. SOFTWARE CASSETTES $9.75 EACH. POSTAGE IN U.S.A. & CANADA 
251 PER ITEM. OUTSIDE U.S. ADD 10% FOR AIR POSTAGE & HANDLING. FOR RUSH ORDERS PAY BY 
POSTAL MONEY ORDER. 10% DISCOUNT ON ORDERS OF 3 OR MORE ITEMS. 
DEALER INQUIRIES INVITED. CUSTOM INDUSTRIAL MICRO-SYSTEMS OUR SPECIALTY. 



* SATISFACTION GUARANTEED * 
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P.O. Box 1285 
Orem, Utah 84057 
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DRAM PLUS 



TM 



• 



DRAM PLUS offers the most powerful memory 
expansion capabilities available for the ASK family of 
microcomputers. Its many important features include: 

• 16K or 32K Dynamic RAM with all refresh 
handled on the board and completely transparent to 
the host microcomputer. 

• Memory does not have to be addressed as a single 
16K or 32K segment. 4K segments of memory may 
be placed on 4K boundaries. 

• Up to 16K ROM/EPROM with provision for four 
ROMs or EPROMs: 2716/2516 2K EPROMs, 
2732/2532 4K EPROMs, or 2332 ROMs. These may be 
mixed on the board. 

• Two Versatile Interface Adapters, each with two 
8-bit I/O ports, additional handshaking lines, two 
timers, and a serial-to-parallel shift register. 

• Prototyping Area has space for adding circuits: 
memory write protection, floppy disk controller, 
communications devices, A/D or D/A, etc. 

• EPROM Programmer handles all four types of 
EPROM: 2716/2516 2K and 2732/2532 4K. 

• Simple Power Requirements of + 5 volts at 1 amp 
and + 12 volts at 150 milliamps. On board regulators 
permit unregulated power to be used. 



Dynamic RAM Memory: The RAM is composed ol compact 41 16 lype 
dynamic memory. Each 4116 chip contains 16K bits, organized 
as 16K addresses with one bit ot information per address. An 8 
bit byte ot memory is obtained by addressing 8 memory chips In 
parallel. Eight 41 16 memory chips provide 16K bytes ot memory. 
DRAM PLUS has provision for two sets of ram chips for a total 
RAM capacity of 32K bytes. All of the memory is socketted and 
each board is tested for the full 32K capacity. The only dif- 
ference between the 32K and 16K versions is that 16K bytes of 
memory have been removed from the 16K version board. This 
memory may be added at any time. 

EPROM and/or ROM Memory: There is provision for up to four 
EPROMs and/or ROMs to be added. These may be a mixture of the 
following types: 

2516/2716 and 2532/2732 EPROMs or 2332 ROM. 
The XX16 EPROMs contain 2K bytes and the XX32 contain 4K 
bytes. The 2332 is a 4K ROM. Using the 4K parts, up to 16K of 
read-only memory may be added. 
Versatile Interface Adaptor [VIA): Contains two 8-bit programmable 
I/O ports with additional handshaking lines; two timers; and a 
serial-to-parallel/parallel-to-serial shift register. The VIA may be 
used to interface keyboards, printers, and many other devices to 
the DRAM PLUS and/or the host system. A 24 page data sheet 
on the 6522 VIA is included in the documentation package. 
EPROM Programmer: The VIA's are used in conjunction with some 
additional circuitry on the DRAM board to program all four types 
of EPROM. A separate programming socket is provided, a 
regulator circuit provides the programming voltage from a +27 
volt input, and voltage to the EPROM is controlled by the pro- 
gram to prevent accidental damage to the EPROM. 
Transparent Refresh: All of the circuitry for refreshing the dynamic 
RAM is contained on the board and operates in a manner that 
makes it completely transparent to the host microcomputer. All 
of the refresh memory accessing is done during Phase One, 
leaving the memory completely available to the host microcom- 
puter during Phase Two. No "clock stretching" or "wait stales" 



DRAM PLUS [16K RAMJ: TCB-101-16 
DRAM PLUS [32K RAM]: TCB-101-32 




RAM Memory Addressing: Although the RAM is packaged as one or 
two 16K segments, provision has been made on DRAM PLUS for 
the memory to be addressed at four separately defined 4K boun- 
daries per 16K segment. There are some restrictions on the set of 
boundaries that may be used within any. 16K segment. Address 
bits A12 and A13 must not be the same for any of the 4K 
segments within a 16K segment. This results in a type of 
"Chinese Menu" selection. One 4K segment may be selected 
Irom each column of the following table, which lists the starting 
address of the 4K boundaries in hexidecimal: 



0000 


1000 


2000 


3000 


4000 


5000 


6000 


7000 


8000 


9000 


A000 


B000 


COOO 


D000 


E000 


F000 



An examination of the table will show that any four contiguous 
blocks will automatically come from different columns. If blocks 
were selected at 1000, 2000. and 3000, then the fourth block would 
have to be 0000 (which is highly unlikely on an AIM/SYM/KIM), 
4000, 8000, or COOO, for that 16K segment of memory. 

Prototype Area: A prototyping area provides space and support for 
the addition of special circuits. The actual prototyping grid is 
approximately 2" by 2-'/," and consists of a matrix of 13 by 28 
holes spaced for standard sockets and IC's. The area is design- 
ed so that wirewrap or solder sockets may be used. The address 
and data lines are readily accessible to this area and convenient 
+ 5V and ground runs are provided. Connections to this area 
may be made through a separate connector facility which can 
support a standard connector with up to 50 pins. 

MICRO Bus Compatible: The connections between the DRAM PLUS 
and the AIM/SYM/KIM follow the same conventions used by the 
original KIM-4 mother board. DRAM PLUS may be interfaced via 
a simple cable or the MOTHER PLUS. 

General Information: The board is high quality, double sided with 
two sets of gold plated fingers with the same positioning as the 
connectors on the AIM/SYM/KIM. The board is the same size 
and shape as the SYM and KIM; 7-'/," wide (excluding the edge 
connectors) by 10-'/," long. All IC's are socketted to make field 
repair and servicing simple. Full documentation consists of in- 
structions, schematics, program listings, data sheets and ap- 
plication notes. A Memory Test and an EPROM Programming 
Program are provided on a cassette tape which loads and works 
on the AIM/SYM/KIM. The DRAM PLUS Manual is available 
separately for $10.00, and this cost may be applied towards the 
purchase price. 

Trade-in: You may be able to trade-in your Rev B MEMORY PLUS 
board toward a DRAM PLUS. Write/Call for details. 



are required. 

DRAM PLUS with 16K RAM P"CB-101-161 S295" US/Canada, or $325°° All Other Countries, plus shipping and handling. 
DRAM PLUS with 32K RAM [TCB-101-32] $395 M US/Canada, or S435 00 All Other Countries, plus shipping and handling. 
Shipping/Handling: US $2" Canada $6" All Other Countries $18 M 

This is one page from our eight page 1980 Catalog. Send name and address for your copy of the compete 1980 Catalog. 
The COMPUTERIST, Inc., 34 Chelmsford Street, Chelmsford, MA 01824 617/256-3649 




MICRO SUBSCRIBERS SPECIAL 
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Just about a year ago, Skyles Electric Works introduced 
a 15 inch wide keyboard with all PET functions on nice, 
plump, full-sized keytops with torsion spring action. 
S.E.W. knew that most owners of the PET 2001-8 couldn't 
remain happy with the undersized keytops and unsatis- 
factory spring action. 

Now you have announced that, effective in January of 
1980, all PETs and CBMs would feature full sized key- 
boards. 

So, thank you, Commodore, for confirming that S.E.W. 
was right al 1 along. 



Meanwhile, S.E.W. hasn't been resting... and now offers with the Big 
Key Board an 1 8 inch ribbon cable at no extra charge. . .and a cassette tape 
containing BASIC and machine language programs that convert the Big 
Key Board to ASCII or typewriter operation, including lower case 
characters, and upper case through the shift key. Even a shift lock, 
quotations in the proper place, numbers across the top row. 




All keytops double shot for lifetime durability. Switching action uses gold cross-point 
contacts; torsion springs are gold plated. Housing is black heavy gauge aluminum. Entire 
unit can be rinsed to clean under water and left to dry. 120 day warranty. Only $125 00* 

MICRO SUBSCRIBERS SPECIAL TILL MAY 15, 1980 $99.50* 

Wouldn't You Love Your PET 2001-8 Even 
More With the Skyles Big KeyBoard? 

Enclosed is my MICRO address label showing subscription number, please send 

Big Keyboard (s).Enclosed is a check $ *.. Charge my VISA, Mastercharge 

(circle one) # Expires 




'California residents: please add 6% or 6.5% sales tax as required 



Skyles Electric Works 



231 E South Whisman Road 
MountainView.CA 94041 
(408) 735-7891 
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New and Better PET 
p User Port Printer Routines 



A series of programs are presented which drive any TTL, 
parallel, or ASCII printer from the PET's user port. 



Michael Tulloch 

103 White Cr. 

Niceville, FL 32578 
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This article describes three programs 
which drive a printer from PET'S user port. 
Any TTL, parallel, ASCII, printer can be 
driven. Two of the programs are in 
machine language and one is in BASIC. 

Although there are several IEEE to 
serial and IEEE to parallel adaptors 
available for the Pet, the user's port is 
often needed to drive an ASCII device. In 
my case I saved $100 dollars by using the 
user port to drive my Trendcom printer. 
No hardware (except a cable and two con- 
nectors) is required. The software is 
equally simple: A printer driver with hand 
shake and a screen reader. 

There are several reasons to drive your 
printer or other ASCII device from the 
user port. First, it is quick and easy. Se- 
cond, some of the IEEE to ASCII adaptors 
respond to any and all device addresses. 
Third, if you already have an adaptor, the 
user port allows a tempory installation 
without interfering with existing devices. 
Another reason is that it allows you to 
have better and more direct control over 
the output. Both data and hand shaking 
can be done explicitly with software. 
Finally, and for me most importantly, it 
saves money. Just $2.19 for a ribbon 
cable and two junkbox connectors, had 
me printing 

In general the following two programs 
comprise a screen printer. Two 
parameters can be adjusted by the call- 
ing program (or as direct commands): 
Start point, and * of rows (if im- 
plemented in RAM), Thus a specific area, 
or window, of the screen can be printed. 
The two programs are named: 1. Printer 
Driver and 2. Screen Reader. For timing 
reasons Printer Driver is implemented on- 
ly in machine language. Screen Reader, 
however, can be implemented either in 
machine language (Version A) or BASIC 
(Version B). 
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1 8380 P0KE85Q > 1 ■$ : WSWW : 

FORR=8TO23:FORC=0 I Q-.'.S 
1 0010 RsPEEKC 32763+C+R*48 > 
1RR1*> IF P=18 RND C=8 THEN STOP 

fl<=31 THEN R=fi+64:: GOTO 18960 
THEN 10060 
THEN fl=R- 1 27 : GOTO 1 6869 



16929 
19830 

10940 



IF 

IF 
IF 



R<=63 

fl>127 
18845 fl=R+32 
18860 POKE850,R:SYS826 
UWR NEXT C:P0KE859,13:SVS826 



10080 NEXT R 
18898 RETURN 
RERDV. Figure 

Let's start with the easy one first— the 
BASIC Screen Reader. Figure 1 is a listing 
of this routine. Line 1000 clears the small 
printer buffer by making a carriage return 
and calling Printer Driver (located at 826 
in this example). Line 10005 forms the 
screen reading loops with R the Row 
counter and C the Column counter. Here 
only eleven lines are printed. The Screen 
Value is placed into A by line 10010. Lines 
10020 through 10045 convert the screen 
value to its equivelent ASCII code. Notice 
that graphic characters are printed as 
lowercase letters if they are on letter 
keys. Reversed letters are printed as not 
reversed letters, and not all graphic 
characters are printed. Figure 2 gives a 
sample of print out for the PET character 
set. The equivalant screen values are 
though 255. Version A is the machine 
language equivalent of Screen Reader. 
It's principle advantage is that it runs 
hundreds of times faster. In fact, on my 
Trendcome 100, which prints bidirec- 
tionally, you can't even see it hesitate 
between lines. At the Trendcom's 40 
char/sec rate, a full screen of 1000 
characters is printed in 30 seconds. Not 
Bad! 
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Another advantage is that you can hide 
it in the second cassette buffer and load 
it in only once. The BASIC version has to 
be attached to your program somehow. 

A flow chart is shown in fiqure 3. It is 
annotated for the machine langage ver- 
sion. Figure 4 shows the dissassembled 
code. Figure 5 gives the HEX code as out 
put by the PET monitor program. 

Block I initializes all registers. The 
screen read address is initialized to 
32767. This is one less than the upper left 
screen start address value. Memory loca- 
tion 995 ($03E3) is the number of Rows to 
be printed. It's used as the Row counter. 
A column counter is stored in 992 (03E0). 
It is initalized with 40 and 40 is held in the 
X register for later use. 

Block II increments the screen read ad- 
dress. Block III gets the screen value oc- 
cupying the screen read address. This 
value is stored in location 996. Block IV is 
the adjustment routine. This is different 
from the scheme used in the BASIC pro- 
gram. Instead of using subtraction, addi- 
tion is used. Although the logic is in- 
verted from the BASIC oroaram. the value 
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adjustments are the same. Critical tem- 
porary storage rigisters in addition to the 
program itself are listed in table I. The ad- 
justed value is passed to the Printer 
Driver (Block V). 

When control returns to Screen Reader 
the colums counter is decrimented. If the 
column counter is not equal to zero, then 
it is reset to the value stored in the X 
register (normally 40). Rows are then 
decrimented (Block IX) 

Block X checks for the row counter 
equal to zero. If it is not, then a new 
screen value is read. If it is then that the 
program returns control to the calling 
routine. 

The Printer Driver routine dissassembl- 
ed listing is shown in figure 6. The PET 



monitor HEX dump is given in figure 7. 
Printer Driver takes a value (here stored in 
85210), places it on the user port output 
lines, provides a data ready output pulse 
and waits for an ACKnowledge pulse. 
NOTE: If no ACK pulse is returned the 
program will continue to hold the PET off 
line. You must assure an ACK pulse will 
always be returned! 

The above description of Printer Driver 
also sets up the Via registers. Each time 
it is entered it resets these registers for 
its own use. Only the E84C register is 
restored to its original value. Further, the 
routine inhibits interrupts. If an interrupt 
were to occur during the brief time a data 
ready pulse was being given, multiple out- 
puts could be caused (and it does hap- 
pen). There is also the chance that the 
ACK pulse would be missed, leaving PET 
in Limbo. Unfortunately this bit of protec- 



tion has an adverse side affect. PET's in- 
ternal clock will not keep correct time. 
Depending upon the amount of printing 
and your printer's characteristics this er- 
ror can be substantial. 

There are several improvements which 
could be made to these routines. Revers- 
ed character handling could be added to 
the "A" version of Screen Reader. Blanks 
could be output for nonprintable graphics 
characters. Codes could be developed for 
cursor command characters. You will pro- 
bably want to make changes for your par- 
ticular printer. There is room within 
Printer Driver to add a delay loop or NOPs 
to stretch the output pulse. Finally, 
Printer Driver can be used alone by pass- 
ing ASCII values directly. Simply use 
PET's ASC ( ) command and Poke loca- 
tion 852. 



Decimal 





1.2 




992 




993 




995 




996 




852 


64(B 65fl 66B B/L 


b»D 63E 


70F 716 72H 731 


74J 75K 


76L 77M 78N 790 


30P SIS 


82R 835 84T 851. 


86U 87w 


33X 89V 9SZ 91 [ 


32\ 93j 


94 A 95_ 32 33! 


34 :: 35# 


36$ 37* 38& 39' 


40< 4i> 


42* 43+ 44, 45- 


46. 47/ 


489 491 582 513 


524 535 


546 557 568 579 


58: 59; 


S@< 61= 62> 63? 


36 v 37a 


98b 99c lfifid 101 e iS2f 1039 


104h 1051 10rj 


1 07k i 03 i i tfMiri 


110n 11 lo H2P 


113^ Iltr" ii5"=- 


116t 117U H8v 


I19w i20x i21y 


122z 123<! 1241 


12t'J j^b- i27 


123 129 130 131 


132 i33 


134 135 136 137 


138 133 


140 141 




142 143 144 145 




146 147 148 145H 


150 13! 


152 153 154 155 


156 i57 


158 159 65R 66B 


6 ^C 660 


69E 70F 716 72H 


731 74J 


75K 76L 77H 78N 


790 80P 


81 Q 32R 335 84T 


35U 86U 


87W 38X 89V 902 


31 l 52\ 


33] 94^ 95_ 32 


33! 34 ,! 



Table I 








Hex 




Function 






$1.2 




Screen read address 




$03E0 




Column Counter 




03E1 




Row counter 




03E3 




Row input 


value 




03E4 




Screen vs 


lue 




0354 




Value of 


output charater 


35* 


36* 


37* 38?- 


39"' 40 1 ' 




41) 


42* 


43+ 44, 


45- 46. 




47/ 


480 


491 502 


513 5^4 




535 


546 


557 563 


579 58: 




59; 


68< 


61= 62> 


63? 96'- 




37a 


33b 


33c 180d 10le I02f 


1039 1041-. 105i 


1 06 J ISi'k 


iSa ' 


103'Yi 110n 11 lo 


112P ii3q 


ii4r- 


115' 


5- 11 6t 117u 


llt;v us 1 '- 1 


i 2L1* 


121y 12 


2z 123< 


124 i i25> 


126^- 


127 


12P. 


129 130 


1 -.'• I 1 6<L 




133 


134 


135 136 


137 i38 




139 


14Pi 


141 






142 


143 


144 






145 


146 


147 143 


145 i 50 




151 


152 


153 154 


155 156 




157 


158 


159 65h 


32 32 




32 


32 


32 32 


32 32 




32 


32 


32 32 


"7*5 ~y 




32 


32 


32 32 


32 32 




32 


32 


32 32 






32 


32 


32 32 


32 32 




32 


^70 


32 32 


32 32 




32 


32 


32 32 


32 32 




32 


32 


32 32 


32 32 




32 


32 


32 32 


32 32 




32 


■751 


32 32 


32 32 





32 32 
Figure 2 
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BLOCK I 



BLOCK I 



BLOCK III 



* 



BLOCK V 



BLOCK VI 



BLOCK VII 



ENTRY 



GET 



BLOCK VIII BLOCK IX 



BLOCK X 



END 



May, 1980 



SET UP 
ZERO PAGE 
JUMP REF 



Figure 3 



GET SCREEN 
SYMBOL 
VALUE V 




JMP PRINT 
SUB 



'J* 




NO 




OUTPUT 
CARRIAGE RET 



RETURN 



JMP PRINT 
SUB 



STPR" 



;•■'!- gd k 



SCREEN P'F C ' 



nin 



£6885 



'T'-'F i Ki r 



DOTE 091779 



£55 



995 
997 
40 



Figure 4: Machine Language Listing of Version A Screen Reader. Note 
that the listing is tor a high memory location. Addresses found at the 
following hex lines must be changed to relocate the program: 
$70f9, $70fc, $7108, $7113, $7129, $7134, $7137. 

•ycpjii-, 7i"it:t P9 00 LDY?" CO 

29949 7630 P2 FF LDXIH FF 

28850 70B2 9E 01 909T>; et'Si 

28853 70B5 ft2 7F LDXIH 7F 

28855 76B7 9E 02 O0STX 0002 

28358 ?0Bfl HE E3 03L0X 03E3 

2888! 70PD 8E El 03STX 03E1 

29994 7000 m2 28 LDXIH 29 

vpc-fc; -0C2 EP NOP 

29937 70C3 9E E0 039TX 03E0 ?': 

28970 7039 19 CLC 

28871 7 1 ?'" 7 P0 SI 0QLDR C'PSi - 

2: : :: : :74 709ft 69 01 RDGIM 01 1 

2*876 7r.r0 6D 01 009TR 0001 

23979 7QCF R0 02 OOLDft 0902 2 

29982 7€'D£ *3 00 BD'-'I''' tr : J tl 

28884 7004 -iD 02 00STA 0092 2 

28887 7007 16 CLC 

23993 70DS Bi 01 LDftlV 01 i 

_,.^; : .- : ,r l ,y L ,u mm t4 fvSyfft '~ c '?'■ 



69 7 r RDLi" 
B0 IF BC3 
PD E4 03L0H 
89 C0 PQCIM 
B0 25 BCS 
ft9 E4 03LOP 
89 El C'DCI" 
B0 37 BCS 
PD F^ 1 63LDR 
99 40 flOCIH 

fm HOP 

l lj HUP 

:--D 54 035*1 PI 
20 3fl 71J5R. 

ar. 18 71-Jrir-" 
tft KOP 

fcH MOP 

90 E4 W 1 - * 



£5935 71^7 .8> CLC 

28933 7193 4C Oft 70J.MP 



-■'. ■.'-■■— 1 ', 


i'L'L"..! 






v ..: i:rt~i 


ftfj** 


*c •;■■-'"? 


70t- j 


>8"3 "1 


7fl£4 






■-■:•■:•" :■ 


70E8 






285£4 


70E9 


2 99 97 


70FB 


23399 


70-0 


?*OH - : 


.•■ i -1 - ■- 






2391 4 


T*'"" £L 


23319 


70F4 


vyyi--' 


■f?r"5 


vyaiy 


7 tft* 6 


23921 


7©r*S 


.29924 


70FC 


'.-'X'-*''' / 


jVFF 


(L- •_'-•— ' 




»a«b 


?itsw 


28929 


71 ai 


28932 


7104 


28933 


71 fc»5 



7t- 

1F 

03L4 

00 

0.3 E 4 
cri 



1 id 



?3E4 986 
49 64 
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0354 

7118 


852 

28898 

29952 


03E4 


93fc 


eb 


/28 


70DM 


?8S38 
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28979 716B 
28940 7l6C 
2894 ! 71 PD 

28944 7110 

28945 7Hi 
28947 7113 
28858 7116 
28951 71 17 

2yy52 7118 
28955 711 8 
28957 71 ID 

28980 7129 
28953 7123 
28985 7125 



E"-"' 

EP 
en ^a 

18 

b'9 2U 

4C F8 

FE 

EM 



RDC1M 
70JMP 
NOP 
NljW 



2 LI 
7 OF 8 



SSS 



28918 



28956 
28989 
28972 

28977 



7126 
7129 
712C 



C> EQ 03DEC 
DO PP Bi-'E 
SE E0 83STX 
CE El 03DEC 
00 09 BNE 
RTS 
E4 03LDA 
F6 78JHP 
HOP 
KC P 



Mil 
4C 

EP 
b m 



y ■>•- •'•"" 

P- '■'■: 

&3Ee L 

03E3 983 

©9 9 

63E4 996 

70EO 28913 



28975 712P 
28988 7134 



(- L' J. ! '"' 

P9 88 LOR IK CO 
80 54 83STP @354 
28 39 71JSR 7:3m 
«C 06 79JHP 700b 
Figure 5 



6C'j 

28988 

28873 



RFC- 1 






5 PO SR PC XR 


VR 


'"■CI"" 








ustij -i'j jy ft 


■SI 


hfc 








H 70PE,7137 












@ 1*2 


7 


4 


b 


K 


i 


.•■'fi-'h ktj yy P2 


i- 1- 


8t 


81 


l~ •*> 


Hi 


.'ytJb fr St 02 


00 


Hfc 


t-£ 


0'."' 


J-JL. 


70BE El 03 P2 


28 


EP 


I"'*" 


EO 


pjV 


78C6 18 RD 01 


80 


69 


81 


8D 


01 


70CE 00 PD 02 


80 


69 


08 


pr< 


02 


70D8 08 18 Bl 


01 


80 


E4 


83 


69 


70DE 7 r BP 1 c 


RD 


E4 


83 


69 


08 


70E6 BO 25 RD 


E4 


83 


69 


Ei 


80 


70EE 37 PD E4 


83 


69 


48 


Eh 


EP 


70-6 8D 54 83 


20 


3P 


71 


4i 




70 tr E 71 ER EP 


PD 


E4 


83 


38 




7105 88 18 40 


DP 


70 


EP 


EP 


PD 


71 OE E4 93 18 


69 


28 


40 


C F 


78 


7116 EP EP CE 


EO 


03 


09 


PQ 


OX 


71 IE EO 03 CE 


El 


03 


00 


09 


60 


7 126 PD E4 93 


40 


F6 


70 


EP 


EP 


712E EP P9 PD 


8D 


54 


83 


•— ':_• 


3P 


7136 71 40 08 


78 


P9 


pc 


;-; H 


43 



28995 714: 



P9 FE LDP In 



i-t 



254 



PRINTER ORImER 



3TRR1 



28986 



END 



£iyo~'i 



TINE 168614 



DPTE 09/17/79 



Figure 6 



2838 






'13P 



R9 -i- LDPIH 

80 43 E85TP 

PD 40 E8LDP 
48 PHP 

P9 FE LDPIH 

80 40 E8STP 

1:8000 7148 PD 48 E8LDP 

•'9803 7148 29 E3 RNDIH 

i'9005 71 4D 80 48 E8STP 
.9008 7i58 EP NOP 



J8988 7130 
•8991 713F 
>g994 7142 

>83S5 7143 
;8987 7145 



29009 7151 
29618 7152 
29011 7153 
29014 7156 
29017 7159 
29020 7150 
29022 715E 
29024 7160 

29027 7153 

29028 7164 



FO NOP 
78 SEI 
PD 54 03LDP 
3D 41 E8STP 
PD 4C E8LDP 
29 IF RNDIH 
89 08 ORflIM 
80 40 E83TR 
EP NUP 
EP NUP 





£. *J •-' 


E3-*7 


5345 


E840 


59463 


FE 


254 


E84C 


5946 


E84B 


59467 


C"7 


£il_ f 


E84B 


5946" 


__,,_ ,. 


O ■_' £. 


E841 


59457 


E84C 


5946: 


IF 


31 i\) 


09 


132 1 


E840 


53463 



23823 


7165 


EP 




NUr 






29838 


7166 


EP 




NL'P 






23831 


7167 


PD 


40 


E8LDP 


F84C 


53463 


23834 


716P 


83 


E0 


6RRIM 


EO 


224 


23036 


7160 


3D 


40 


E3STP 


£840 


53463 


2yy._'9 


Vlt-ih 


hP 




NUr* 






29840 


r-i,-y 


IS 




OlO 






2904 1. 


7171 


EP 




KOP 






23042 


7172 


PD 


40 


E8L0R 


Lo4U 


59463 


vyya;-. 


r* 1 ( 5 


£9 


•\:' 


\ J MJ1 ri 


i1* ' 


2 


£sy4 ,••• 


/i /•,-•• 


HJ 


hy 


bhl' 


*-y. 


2^-S 


2Hi-j4y 


/173 


SS 




KLM 






2805O 


71 7P 


C .C' 




L'LU 






2305 1 


7178 


68 




RT5 






29850 


7170 


EP 




NC P 






c'yyt>^ 


.••i.-'u 


hM 




NUF 






25854 


7l7E 


EP 




h'L'P 






25055 


717P 


68 




BRK 






29056 


7180 


00 




RRK 
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9 



KfcM'JY „ 


















HUH 


















i> i-'U 


ys 


RC 


Xfi 


VR 


SP 








. ; C8ED 


38 


7p 


•7C 


"7 _: 


cp 








H ?1 Z 


!fl#?18€ 


1 














n 


1 


■-• 


~ 


4 


cr 


K 


i 


psfJsO "'Or 


■I TOR 














LC'!' I* '■ 


















REfiOV. 


















f;* PC 


FR 


OP 


vq 


VR 


SP 








. i C8E0 


30 


"IS 


7E 


31 


FE 








M 7 '• ' 


?p .. " 


71 pf 


1 














tj 


1 


2 


~7 


4 





~, 


r 


t . 7J.3A 


uq 


FF 


8D 


43 


E8 


PD 


J f; 


i '.; 


.! 7142 


i i. J-[ 


R9 


FF 


80 


4C 


C.S 


HU 


4B 


.: 714R 


E8 


29 


r.~ 


80 


48 


E8 


EP 


Efl 


.: 7152 


"70 


RD 


54 


@3 


SO 


4i 


lTO 


RO 


.: 7J5R 


4 C 


E8 


*"' Ci 


IF 


89 


C8 


80 


sV f~" 


. : 7! 62 


CO 


Efl 


Efl 


Efl 


Efl 


RD 


4C 


Ey 


716P 


89 


E0 


8D 


4C 


E8 


Efl 


i p 


E fl 


,. 7172 


RD 


4D 


ES 


29 


02 


F8 


F9 


68 


. 1 i _ i H 


58 


60 


ER 


ER 


Efl 


fin 


80 


£4 



PFPOVn 



r 



• 



Figure 7 



General Purpose 10 Board 



lo. 



APPLE II 



* 2 8 bit programmable IO porls 

* 1 timer/ square wave generator 

* 1 timer/counter 

* 1 shift register 

* 2 IO cables 50 pages instructions 

* Large area for user buffers, relays, etc. 
Board u>*> 6522 VIA See MICRO, 13:41, 15:17, 17=27, 1979 

Order AP 1.0 $69.50 



Extender Card for APPLE II 

Lifts IO boards 4" above chassis 
All lines labeled and numbered 
Convenient test points for all lines 
Order AP 2.0 $24.50 



Orders postpaid in US 

Texas residents add 5% tax 

MC-VISA ordersemust flive 
all card data 



microAustin 

PO Box 14408 

Austin, Texas 

78761 




GREAT 

PET 

SOFTWARE 

"Precise, humanized, well documented an excellent 
value" are the applauds now being given to United 
Software's line of software. These are sophisticated 
programs designed to meet the most stringent needs of 
individuals and business professionals. Every package 
is fully documented and includes easy to understand 
operator instructions. 

DATABASE MANAGEMENT SYSTEM - A comprehensive, interactive 
system like those run on mainframes! Six modules comprising 42K ot 
programming allow you to; create, edit, delete, display, print, sort, 
merge, etc., etc. - databases of up to 10,000 records. Printer routines 
automatically generate reports and labels on demand. 60 pages of 
concise documentation are included. Requirements- 16-32KPETand 
2040 Dual Disk (printer optional). . . .Cost $125 

ACCOUNTS RECEIVABLE/PAYABLE - A complete, yet simple to use 
accounting system designed with the small businessman in mind. The 
United Software system generates and tracks purchase orders and 
invoices all the way through posting "controlled" accounts payable and 
accounts receivable subsystems. 

Keyed Random Access file methods makes data access almost 
instantaneous. The low-cost solution for the first time computer user 
with up to 500 active accounts. Requirements - 32K PET, Dual Disk, any 
80-column printer. . . .Cost $175 

CASH RECEIPTS & DISBURSEMENTS - Makes it a breeze to track all 
outgoing payments made by any type of business operation. Checks 
are tracked by number and categorized by type of expense. Sorting, 
summary, and audit trails make it easy to post to general ledger. This 
system also categorizes incoming receipts. Uses KRAM file access 
method. Requirements - 32K PET, Dual Disk (printer optional). . Cost 

$99.95 

KRAM - Keyed Random Access Method - The new, ultra-fast access 
method for the PET Disk, provides keyed retrieval/storage of data, in 
either direct or sequential mode, by either full or partial key values. 
Written by United Software in 6502 machine code, and designed with 
the PET in mind, it exploits all the benefits of the PET Disk, allowing full 
optimization of your system. Eliminates the need for "Sort" routines! 
KRAM provides flexibility never seen on a micro before. KRAM is 
modeled after a very powerful access method used on large-scale IBM 
Virtual Storage mainframes. So "KRAM" all you can into your PET - it 
will love you for it. . . .Cost $79.95 

(Sublicenses available to software houses.) 



PROGRAMS FOR 
ENTERTAINMENT 

Space Intruders 
("Best Game of 1979") . .$19.95 

Jury/Hostage 12.50 

Kentucky Derby/Roulette 9.95 

Alien I.Q./Tank 9.95 

Tunnelvision/Maze Chase 14.95 

Submarine Attack 9.95 

Battle of Midway 7.95 

Laser Tank Battle 9.95 

Swarm 14.95 

Look for the RED-WHITE-BLUE United Software Display at 
your local computer dealer, or send check or moneyorder, 
plus $1.00 shipping to: 

UNITED SOFTWARE OF AMERICA 



Super Startrek 14.95 

PET Music Box 29.95 

UNITED SOFTWARE 
PROGRAMS FOR BUSINESS 

Checkbook $15.95 

Mortgage 15.95 

Finance 12.95 

Bonds 12.95 

Stock Analyzer 22.95 

Stock Options 24.95 

6502 Macro Assembler . . . 49.95 



750 Third Ave. 

New York, N.Y. 10017 



Dealer inquiries invited 



Southeastern Software 



DATA CAPTURE 3.0 



Is DATA CAPTURE just another smart terminal program for your Apple II® or 
Apple II Plus®? 

NO. It is a GENIUS TERMINAL PROGRAM and is designed to be used with the 
Micromodem II®. 

Tired of watching data and programs scroll off the screen forever? Then DATA 
CAPTURE is the program for you. 

• ANYTHING that appears on the screen of your Apple II can be captured. 
Any program or data. 

• You can then save what you have captured to disk, dump it to your printer 
or even do simple editing with DATA CAPTURE. 

• You can use DATA CAPTURE to compose text offline for later transmis- 
sion to another computer. Think of the timeshare charges this will save you. 

• Use DATA CAPTURE with the Dan Paymar Lower Case Adapter and you 
can enter lower case from the keyboard for transmission to another computer 
or capture both upper and lower case. 

• A program is also included to convert your programs to text files for 
transmission using DATA CAPTURE. 

• You receive two versions of the program. One is for upper case only and 
one for both upper and lower case use with the above adapter. 

DATA CAPTURE will save you money if you are using a timesharing system 
because you can compose messages offline for later transmission. You can also 
quickly capture data for later reading, printing or editing. Requires DISK II®, 
APPLESOFT II®. 

Price $29.95 

If your local dealer does not have DATA CAPTURE then order directly. We ship 
DATA CAPTURE within 3 working days of receipt of order and welcome your 
personal check. We also accept Visa and Master Charge. Add $49.95 if you would 
also like to order the Dan Paymar Lower Case Adapter at the same time. 

Ask for a catalog of our software. 

* Apple II, Apple II Plus, Disk II and APPLESOFT II are trademarks of Apple Computer Company. 
" Micromodem II is a trademark of D.C Hayes Associates, Inc. 

SOUTHEASTERN SOFTWARE 

7270 Culpepper Drive 

New Orleans, LA 701 26 

504/246-8438 504/246-7937 
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Symbol-Table Sorter/Printer for the AIM Assembler 

by Mel Evans 
[MICRO 20:43] 

"After more extended use of the program.l have found the 
following pair of bugs. 

The first can be cured by replacing the code shown in Figure 1 A 
(occurring at the end of subroutine SORT) by that in Figure 1B. 
The old code works often, but not always. The new code always 
works. 

The second bug won't show until you start getting fancy with 
your source code. I was mistaken in thinking that memory loca- 
tions 003C, 003D contain the address of the last symbol found 
during assembly. Instead, they contain the address of the last 
active symbol. With straightforward code, these will be one and 
the same. But suppose you have written your last subroutine 
(let's call it SUBZ) and then decide to initialize a couple of zero- 
page addresses (starting at ZP1) as in Figure 2A. After 
assembly, the last symbol will be SUBZ, but the last active sym- 
bol with be ZP1. And with this stored in 003C, 003D, you will get 
a very short listing! 

The problem could be solved by re-writing the program to avoid 
using 003C, 003D. But, ther's a simpler solution, as shown in 
Figure 2B. Add a new symbol, LAST, as the last byte of the 
program. (This is a good practice anyway. After assembly, the 
address of LAST tells you precisely how much memory the pro- 
gram needs.) The, after initialization and any other housekeep- 
ing, add the line "• = LAST". This makes "last active" *■■■»;'.>. 
"LAST", and the listing comes out complete." 



Microbes 



and 



Updates 



equal 



Expanding the SYM ■ 1 ... Adding an ASCII Keyboard 

by Robert A. Peck 
[MICRO 21:5] 

"As we discussed, here is a corrected version of my progrm 
listing. Somehow the hex locations column of this listing was 
not used for the article. [Sorry about that - MICRO] Typos cor- 
rected on final version including label "DISP" change to WAIT2 
at location 206 (minor), incorrect object code fixed at line 222 to 
20 47 8A .... Last was pointer to KSTAT at line 240 which should 
be 39." 

Submitted by: Robert A. Peck 
P.O. Box 2231 
Sunnyvale, CA 94087 



r 



• 



Submitted by: 



Mel Evans 

ERIM, P.O. Box 8618 

Ann Arbor, Ml 48107 



JSR CRCK 
JSR INCADR 
BMI PRNT1 
BEQ PRNT1 
JSR GAP 
RTS 

Figure 1A: Old SORT Code 



SUBZ 



JSR CROC 

TXA 

BNE FIN 

JSR INCADR 

BNE PRNT1 

DEX 

BNE PRNT1 

FIN JSR GAP 

RTS 

Figure 1B: New SORT Code 
SUBZ 



RTS 



*=ZP1 
.DBY $0A0B 


LAST RTS 

• 


• 
i 

.END 


*=ZP1 

.DBY $0A0B 


Figure 2A: Wrong "Last Active" 


> 

*=LAST 




» 

.END 



Figure 2B: Right "Last Active" 



0200 
0203 
0206 
0208 
020ft 
020C 
020E 
0210 
0212 
0214 
0216 
0219 
021C 
021E 
0220 
0222 
022? 
0227 
022ft 
022C 
022E 
0230 
0233 
0235 
0237 
0239 
023C: 
023B 

.■:■:"!<•• 
0243 

0248 
024A 
0240 

0252 

0254 
0257 



20 88 81 GKEY JSR 

fill 01 AS LDA 

FO 24 BEQ 

85 F-l STA 

A9 10 IDA 

85 EF STA 

C6 F-0 WAIT1 DEC 

DO FC BNE 

C6 EF dec 

DO F8 BNE 

20 03 89 SCANA JSR 

2C 01 AS BIT 

30 F8 BMI 

A5 Fl LBfl 

29 7F AND 

20 47 8A JSR 

A5 Fl L DA 

29 7F AND 

4C B8 81 JHP 

A9 10 WAIT2 LBA 

85 EF STA 

20 03 89 SCANB JSR 

C6 EF DEC 

DO F9 BNE 

F0 CA BE0 

AD 01 AS KSTAT LIlA 

0A ASLA 

60 RTS 



20 86 8B 
A9 00 
8D 61 A6 
A9 02 
811 62 A6 
A? 39 
SB 67 A6 
ft9 02 
BD 68 A6 
4C 03 80 



SAUER SAUE REGISTERS 

A801 GET PARALLEL ASCII 

UAIT2 UNLESS HONE, THEN BRANCH 

00H STORE IT A WHILE 

$510 DEBOUNCE CONSTANT 

OOEF HE BOUNCE 

00(0 SMALL LOOP 

WATT! 

OOEF LARGE LOOP 

UAIT1 

IJSCN'J SCAN niSPLAYdJSE SCANVEC) 

A801 IS KEY STILL DOWN -1 

■:rft>!A WAIT FOR KEY RELEASE 

OOFl KEY UP. PROCESS KEY 

SS7F STRIP KEY STROBE BIT 

OUTCHR SEND INTO IilSBUF 

OOFl GET IT AGAIN 

JS7F STRIP IT AGAIN 

RESXAF RETURN WITH ASCII IN A 

W10 IF NO KEY. 

OOEF SCAN DISPLAY 

IJSCNv THRU SCAN'.'CC 

OOEF A NUMBER OF TIMES 

SCANB THEN GO BACK 

GKEY AND LOOK AGAIN 

AS01 READ ASCII INPORT 

LIFT MSB INTO CARRY 
RET. CFLAG-1 IF KE1 



IN.!T JSR ACCESS UNPROTECT SYSRAM 



LBA MO 
STA A661 



LDA 
STA 
LDA 
STA 
LHA 
STA 
JMP 



S02 

SS39 
A667 

to? 

WARM 



MODIFY 

KEYBOARD 

INPUT 

VECTOR 

KEYPRESS 

STATUS 

VECTOR 

WARM ENTRYvMONITOR 



rnrr i U P t0 SI 70. in merchandise 

rn tt ! with purchase of PET-CBM item ! ! ! 



FREEMERCH 



PET 16K Large Keyboard $ 995 $130 

PET 32K Large Keyboard $1295 $170 

PET 6K Large Keyboard (New) $ 795 $100 

PET 2040 Dual Disk (343K) $1295 $170 

PET 2023 Printer (pres feed) $ 695 $ 70 

PET 2022 Printer (trac teed) $ 795 $100 

KIM-1 $159 (Add S30 (or Power Supply) SYM-1 

AXIOM EX-801 Printer-PET 

2114 L 450 ns 5.35 24/4.95 

2716 EPROM (5 Volt) 

6550 RAM (for 8K Pet) 

PET 4 Voice Music System (KL-4M) 

All Books and Software 

Leedex Video 100 12" Monitor 




$ 209.00 

S 477.00 

100/4.45 

29.00 

12.70 

34.50 

15% OFF 

119.00 



ATARI — INTRODUCTORY SPECIAL 

ATARI 400. Atari 800. and all Atari Modules 20% OFF. 



Heath WH-1 9 Terminal (fact, asm.) 770.00 

Programmers Toolkit - PET ROM Utilities 44.90 

PET Word Processor - Machine Language 24.00 



3M Scotch 8" Disks 
3M "Scotch" 5" Oisks 
Verbatim 5" Disks . . 
Disk Storage Pages . . . 



. ■ 10/31.00 

V, 10/31.50 

*.. 10/26.50 

.... 10/ 3.95 



Cassettes (all tapes guaranteed) Premium quality, high output low 
noise in 5 screw housing with labels: AGFA Pt 61 1 
C-10 10/5.95 50/25.00 100/48.00 

C-30 10/7.00 50/30.00 100/57.00 

Add S 1 per order lor UPS shipping. 
Ask for 6502, TRS-80, and S-1 00 Product List. 



A D UOmpUlBrS Montgomeryville. PA 18936 

(215) 699-8386 



B ACL AIM would like to know if you 

WANT TO PROCESS DATA 
ON YOUR APPLE? 

• if so you should be looking for 
efficient tools to assist with data 
entry, (i.e. building files) and file 
handling (i.e. scanning, sorting, 
printing and copying files). 

and 

• if you are also looking for economy, 
we think you will be pleasantly 
surprised by the low price of the 

BACLAN FILE HELPER 

available at your Apple Computer Dealer 
in both Applesoft and Integer Basic versions 



d 



BACLAN 



-(301) 997-9610 



P.O Box 36 



Columbia, MD. 21045 



DISK DRIVE WOES? PRINTER INTERACTION? 
MEMORY LOSS? ERRATIC OPERATION? 
DON'T BLAME THE SOFTWARE! 





ISO-1 ^^Lj ISO-2 

Power Line Spikes, Surges & Hash could be the culprit! 
Floppies, printers, memory & processor often interact! 
Our unique ISOLATORS eliminate equipment interaction 
AND curb damaging Power Line Spikes, Surges and Hash. 
•ISOLATOR (ISO-1 A) 3 filter isolated 3-prong sockets; 
integral Surge/Spike Suppression; 1875 W Maximum load, 

1 KW load any socket $56.95 

•ISOLATOR (ISO-2) 2 filter isolated 3-prong socket banks; 

(6 sockets total); integral Spike/Surge Suppression; 

1875 W Max load, 1 KW either bank $56.95 

•SUPER ISOLATOR (IS03), similar to ISO-1A 

except double filtering & Suppression .... $85.95 
•ISOLATOR (ISO-4), similar to ISO-1 A except 

unit has 6 individually filtered sockets .... $96.95 
•ISOLATOR (ISO-5), similar to ISO-2 except 

unit has 3 socket banks, 9 sockets total . . . $79.95 
•CIRCUIT BREAKER, any model (add-CB) Add $ 7.00 
•CKTBRKR/SWITCH/PILOTany model 

(-CBS) Add $14.00 

PHONE ORDERS 1-617-655-1532 

l&J Electronic Specialists, Inc. 



<J 



171 South Main Street. Natick. Mass. 01760 



Dept. MI 






for the AIM 




w 



< 
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AIM MicroChess with Player's and Programmer's Manual, 
complete Source Listings, Object on Cassette Tape. 
$15.00 plus shipping [$1.00 US/$2.00 Anywhere Else] 
MICRO Software, P.O. Box 6502, Chelmsford, MA 01824 






Graphics and the Challenger C1P, Part 5 



This final installment in the series discusses plotting 
techniques and moving characters. 



William L. Taylor 

246 Flora Road 

Leavittsburg, OH 44430 
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The ability to have characters and have 
them move in our game programs is a 
must. How do we accomplish this task? It 
is a simple task to implement. We do it 
with a technique called plotting. 

C1P Plotting Technique 

In order to have any character move on 
our C1P's Monitor screen, we must first 
know where we wish our character to 
start, the angular directions in which it is 
to move, and where the character's move- 
ment will end. If you will examine the ex- 
ample of the plotting diagram in Figure 1, 
you can see the angular directions in 
which the character can be made to move 
on the monitor screen. These angular 
directions are relative to any point on the 
screen, i.e., relative to a certain position 
on the Video RAM. If, for example, the 
starting location were 54000 decimal, the 
zero point would be 54000 decimal and all 
movement would be relative to that point. 

As stated in an earlier part of this 
series, we can cause a character to be 
placed on the screen of our C1P with a 
BASIC POKE statement. We move the 
character that has been placed on the 
screen with a BASIC FOR/NEXT loop. In 
the explanation of plotting and how to 
develope animated characters we will use 
the functions of BASIC to develope our 
programs and to describe animation 
methods. 

To begin our explanation, let's use 
decimal location 54000 as an example 
again as a starting point. A BASIC pro- 
gram would use this decimal location as 
a variable content. For example, 10 A = 
54000. Now that we have a starting point, 
we can move the graphics character in 
any direction shown in the diagram in 
Figure 1. For example, if you wish the 
character to move in a vertical direction, 
with a BASIC subroutine we can get the 
character displayed and moved. In order 
to explain how this proceedure works, 
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please refer to the BASIC program 
subroutines in Listing 1, along with 
Figure 1. 

If we wish to have an animated 
character (one that moves) we must first 
know the start, end, and path of the 
character, as stated before. The 
character must be made to appear at a 
point along the path of angular move- 
ment. The character is then displayed for 
some duration of time. Next it is erased 
from its present position and then 
displayed at a new position on the 
monitor screen. This process must be 
continued for the desired distance along 
the plotted path that we have chosen. 
These criteria can be executed with 
BASIC or Machine Language porgrams. 
Since we are primarily programming in 
BASIC, we will develop some BASIC 
routines to show how the character can 
be produced and moved on the C1P's 



monitor screen. 

The BASIC routine in section one of 
Listing 1 will be used to generate an 
animated character that will primarily 
move from near center screen downward 
to near the bottom of the screen. This 
subroutine begins at BASIC progran line 
5. Here the REM statement tells the user 
that this is a routine to generate the 
movement of a character downward. Line 
10 is the real beginning of the subroutine. 
At line 10 the A variable is loaded with the 
decimal beginning of the memory loca- 
tion where the character will first be 
displayed. Notice that this line forms part 
of a FOR/NEXT loop. Also notice that this 
loop will be incremented by a total of 32 
counts for every pass through the pro- 
gram. This is done with the STEP function 
of BASIC. The FOR/NEXT loop at line 10 
actually sets the limits of movement of 
the character. These limits are in the 
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For an angular movement in any direc- 
tion.use the value in the chart to cause 
movement in that direction. It must be 
understood that the decimal beginning 
and ending must be caluclated because 
for each pass through the loop with a 
step function, the variable will be in- 
cremented by the amount in the step 
value. 

Study the remainder of the modules in 
Listing 1, from our discussion you should 
be able to see just how these subroutines 
work. Load the programs into your C1P 
and watch the action on the screen. This 
will show you the results. The diagram in 
Figure 2 gives the complete memory map 
for a C1P. This is for a 25 by 25 character 
format. Use this diagram for all your plot- 
ting to find any location on the C1P 
monitor screen. 

Now that we have seen some examples 
of how a moving character is made to 
move on the C1P's screen, let's use some 
of these techniques to develop a program 
that has some moving character 
elements that form a game. Listing 2 
shows a game program that uses moving 
elements. These are: a starship and lasar 
cannon shots directed at the starship. All 
the techniques that we have discussed, 
that give the sensation of motion, are us- 
ed in Listing 2. Please refer to this listing 
as we discuss the inner workings of the 
program's operation. 

The program is presented, as I have 
said, as a game. The starship moves 
across mid-screen and the cannons are 
placed at each bottom corner, and at mid- 
bottom of the screen. The keyboard keys 
5,6, and 7 are used to fire the cannons. A 
hit score total is printed out at the top of 
the monitor screen for the player. 

This program is straight-forward and 
each module is identified by REM 
statements. This discussion will deal 
mainly with graphics and the keyboard 
routines, so please continue to refer to 
Listing 2. The remainder of the program 
should be self-explanatory. 

The program from line 300 through 347 
forms the main line BASIC module. It is 
used to draw and move the starship 
across the screen. The polling routine for 
the keyboard is located from line 335 to 
line 344. If a 5,6, or 7 key is pressed, a 
GOSUB to a cannon shot routine will 
result in a shot at the starship. Key 5 
causes a shot from bottom right upward 
diagonally to top left of the screen. A 7 
key results in a shot from bottom left to 
top right. A 6 key results in a true vertical 
shot. 

The position of the starship is always 
contained in the K variable. This location 
is always checked in each shot routine at 
lines 415, 462, and 525. If a hit occurs, the 
program jumps to line 600 where an ex- 
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plosion of the starship will be displayed 
at the screen location contained in 
variable K. Next a hit score will be placed 
on the screen. The hit count will be check- 
ed for 10 hits. If so the player will be in- 
formed that he has completed the exact 
number of hits and has won the game. If 
the player has less than 10 hits, the pro- 
gram returns through RETURNS to the ex- 
act main-line program at line 300. 

This program uses more of the 
elements contained in the Character 
Generator ROM. These elements are the 
elements that are used to draw the star- 
ship. Their decimal equivalents are 9 and 
12, and are written into video memory 
with the POKE statement at line 310. 
After a delay at line 320, the starship is 
erased and placed at the next location in 
the FRO/NEXT loop from line 300. The 
cannon shots are primarily POKEd to 
screen memory, displayed for some dura- 
tion of time and then erased. This pro- 
cess continues until the FOR/NEXT loop 
has been incremented to its maximum 
value. 

Conclusion 

If you have followed all five parts of 
this series, I believe that you should now 
have sufficient knowledge of your C1P's 
graphics capabilities. I hope that you now 
also have a better understanding of the 
polled keyboard, and how to use these 
capabilities with BASIC programming to 
produce real working programs that will 
be enjoyable to use. Hopefully you have 
learned with me through these efforts 
and I will see some of your programs 
published in the pages of MICRO in the 
near future. With that, I will conclude this 
series of articles and I hope that these 
programs and ideas will be as much fun 
for you as you read and experiment, as 
they have been for me in the writing. 
Good luck with your programming and 
with your writing. 



SECTION 1) 

5.UM yoVK CHARACTER DOWN 

10 FOB A = 53776 TO 54160 STEP 32 

20 POKE A, 161 

30 FOR B = 1 TO 50 : NEXT B 

40 i GXjJ A , 32 

50 HEXT A 

SBCTIOJT 2) 

60 REIi MOVE CHARACTER UP 

70 FOR A = 54160 -TO 53763 STEP- 32 

80 POKE A, 161 

90 FOR B - 1 TO 50 : NEXT B 

100 POKE A , 32 

110 MBIT A 

SECTION 3 ) 

120 REM M0VB CHARACTER RIGHT 

130 FOR A - 53776 to 53787 

140 POKE A , 161 

150 FOR B « 1 TO 50 : NEXT B 

160 POKE B , 32 

170 NEXT A 

SBCTION 4 ) 

180 RBM MOVE CHARACTER LBFT 

190 FOR A = 53776 To 53763 STEP -1 

200 POKE A , 161 

210 FOR B ■ 1 TO 50 : NEXT B 

220 POKE A , 32 

230 NEXT A 

List 1 



Photographs for this series were pro- 
vided by William L Taylor, Jr. 
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OHIO SCIENTIFIC 
C1-P MINI-FLOPPY EXPANSION ACCESSORIES 



+ 31 



+ 32 



Figure 1: Plotting Directions for the 
C1P 



L I ST 1 -SOU 

1 REM DEMONSTRATION PROGRAM FOR ANIMATED ELEMENTS OH 

2 REM BY WILLIAM L. TAYLOR 12.-3. 1379 OSI C1P 

3 PRINT"STAR SHIP ATTACK" 

4 PRINT: PRINT" DESTROY THE STARSHIPS WITH KEVS 5-6,7 

5 PRINT" VOU GET 10 SHOTS" 5 PRINT 
s F oR S=l TO 10000= NEXT S 



10 |_=2: U0T0350 

299 REM DRAW STARSHIP AND 

300 FOR K-53763 TO 53737 
310 POKE K, 9: POKE K+1,12 
320 FOR J=l TO 50: NEXT J 
330 POKE K.32:P0KE K+1.32 
335 POKE 530, i: POKE 57083- 127 
337 C=C+1 

342 IF PEEK < 57088 > =253 THEN GOSUB 400 

343 IF PEEK < 57083^=251 THEN uOiUB 500 

344 IF PEEK<S708S>=247 THEN G0SUB450 

345 NEXT K 
347 GOTO 300 

349 REM CLEAR SCREEN 

350 FOR T=-3 TO 32: PRINT: NEXT T 
366 GOTO 300 

39^ REM DRAW RIGHT UERTICAL SHOT 

40O FOR Tl=54147 TO 53403 STEP -31 

410 POKE Tl-249 

415 IF T1=K THEN GOSUB 600 

420 FOR T2=l TO 5: NEXT T2 

425 POKE Tl-32 

430 NEXT Tl 

438 RETURN 

449 REM DRAW LEFT UERTICAL iHOT 

456 FOR T3=54171 TO 53379 STEP -33 

460 POKE T3-255 

462 IF T3=K THEN GOSUB 600 

463 FOR T4=l TO 5: NEXT T4 

464 POKE T3.32 

465 NEXT T3 
470 RETURN 
475 POKE T4-32 

499 REM DRAW UERTICAL SHOT 

500 FOR T5=54158 TO 53390 STEP-3Z 

OK 

LIST4_5O0-3OO 



EVBOARD FOLLillb P.OUTINE 



500 
520 
525 
530 
540 
550 
580 
599 

600 

610 
620 
630 
640 
650 
660 
662 
665 
678 
630 
690 
700 
710 
OK 



FOR T5=54153 TO 53390 STEP-32 

POKE T5-24S 

IF T5=K THEN GOSUB 600 

FOR T7=l TO 5: NEXT T7 

POKE T5,32 

NEXT T5 

C=0: RETURN _ .,_ 

REM CHECK SHOT HIT DRAW EXPLOSION AND DISPLAV HITS 

E=0: U=53731 

POKE U+E.32 

FOR A=l TO 10: POKE K, A: NEXT A 

E=E+l:IF E<20 THEN 610 

IF E=20 THEN POKE 53455,72: POKE 53456, 73: POKE 53457, 

POKE 53453, 32: POKE 53459, L+47 

L=L+1 

IF LOO THEN RETURN 

IF L=10 THEN PRINT" ALL TARGETS DESTROYED" 

PRINT" VOU HAUE SAUED THE UNIVERSE" 

PRINT" WANT TO PLAY AGAIN VES OR NO" 

INPUT Al* 

IF fil*="VES" THEN 1 

IF A 1*=" NO "THEN END 



NO. 


Mm 


Quantity 


Price 

Each 





Challenge' IP (Retail $349) »ith manuals, 
demo p'OQfam tape AvaiiaDte with *K <x no 
memory (OK), 




(OKI «319. 
(4KI t349 


1 


Model 600 Superooard (Retail $279) with 
manuals, oemo lap* Available «itr> « orno 

memory 




(OKI $M». 
(4KI $279 


2 


Model 610 Mint Floppy Expansion Boaro (ex- 
pendable 10 24KI Available win 6K of no mem- 




(OKI $210. 
(SKI $295 


3 


Model 620 C1-P loOSi 48-pm C3 Bus Convene' 

(optional) 




S 25 

(eslimaiel 


4 


5V 3A Power Supply (lot enner 600 or 610 
Board) Fits cabinet, item 10 directly 




» 38a»5 


i 


MPi 40-track Dis« Drive (Retail S4S0) in Metal 
Cabinet, with or without powe- s-po'y ii2vl 




noP/S MtO. 
wiihP'S $4SC 


5a 


MPi 40 - track Disk Drive (to cac-net) includes 
data separator 




S320 


6 


Cable Adapter 610 boaroioois* drive includes 
interlace schematic 




S 34i0 


7 


Cable Adapter 600 board 10610 board 




J 995 


a 


4K Memory (8-21 14 si 




» 64 


«■ 


BK Memory (16-21 14 s) 




$110 


s 


Sprue Fan (Needed tor 12K and upl 




$ 20 


10 


Challenger ip Caomei w power cord and tuse 




$ 49*5 


it 


Manuals Set Challenger 1 Includes sche- 
matics 




S 5.00 


12 


Manual. MPI Disk Otive 




$1040 


13 


Marual. Shugarl SA-400 Disk Dn.e 




$1040 


— 


Program Cassettes (Blank 1 10 mm BestOualtty 




J 1 00 


- 


Programs (Graphics. Business Home, etc.l 




$ 600 


Memory Capacity 

•00 SuparDoard 8K Total 
■in Fnoanaion 24K Total 
GranO Total Hu 32K 




Sue Total 
8% Tax 
Total 







copy this list and use as order lorm WE PAY SHIPPING 



OHIO SCIENTIFIC EXPANSION 
INFORMATION 

Conversion of C1 P (Cassette) to 52x26 dis- 
play. Detailed step-by-step instructions for 
doubling the C1P speed and display size! 
Order Bulletin 1105 $12.00 

Conversion of C1P (Minifloppy) to 52x26 
display. Same as above but includes dis- 
play driver for disk operating system. 
Order Bulletin 1105MF $20 

Conversion of C2-4P or C2-8P to 8 in. 
5V4 in. floppy. Instructions and schemat 
for converting cassette-based units ir 
floppy systems. 
Order Bulletin 1106F 

• Ohio Scientific Challenger 

• Commodore KIM 

• S-44 Microprocessor Boards 

• Expansion, Repair, and Soft- 
ware 

SILVER SPUR 

Electronic Communications Co. 

3873F Schaefer Avenue 

Chrno, Calif. 91710 

(714) 627-9366 



Check, Visa. Mauerchare* 
•OSTPAID « USA 
Calilorma add ** ua 



$20 



f, 





Introducing AppleSeed, our 
newest publication to whet 
your Apple* appetite! 

We invite you to subscribe to AppleSeed ■ the 
magazine that is to the Apple II* what SoftSide is to 
the TRS-80**. It offers the newest in software pro- 
gramming hints and ideas tailored especially for 
your computer. AppleSeed features challenging pro- 
grams for both the do-it-yourselfer and the in- 
dividual interested in pre-packaged programs and 
games . . . your own preview of the best available on 
the market today. A typical slice of AppleSeed con- 
sists of one major (new 16K) commercial level pro- 
gram (completely listed for your keying pleasure), 
accompanied by two or three applications for prac- 
tical use or fun, supplemented by informative ar- 
ticles to polish your Apple*. Get right to the core of 
your Apple* needs and order AppleSeed today! 12 
issues, 1 year, $15.00. AppleSeed is the newest 
member of . . . 



« 



PUBLICATIONS 

6 South Street, Mllford, NH 03055 
(603) 673-5144 



•A registered trademark of Apple Computers. "A registered trademark of flsdlo Shack and Tandy Corp. 



Lower Case and Punctuation 
1 in APPLESOFT 



Do you need to get lower case and punctuation into your 
BASIC strings? Then, try these programs. 



James D. Childress 
5108 Spring lake Way 
Baltimore, MD 21212 
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Introduction 

While computer people may adapt to 
all caps, the general public still uses, and 
apparently likes, lowercase. Printing with 
lower case is more familiar, more read- 
able and more acceptable. Thus, we who 
work with computers should provide 
lower case in any printout that we expect 
or hope laymen to read. After all, com- 
puters should adapt to people; people 
should not have to adapt to computers. 

Also, who is there among us who 
hasn't wondered at how the APPLE 
handles punctuations in strings? In IN- 
PUT'S, we have found to our dismay that 
a "JONES, JOHN" results in an error 
message saying "?EXTRA IGNORED" 
and later finding the string variable as on- 
ly "JONES" with nothing to tell us which 
Jones that may be. What wouldn't we 
give to get quotation marks and commas 
in the places we want? 

So much for what should be or what we 
want. The APPLE doesn't have lower case 
and seems rather whimsical about punc- 
tuation. Well, face it; there were a number 
of compromises made in the design of 
the APPLE and Applesoft. Of course, 
some of these deficiencies can be con- 
quered by money. We can buy one of the 
lower-case boards and live more or less 
happily ever after. Unfortunately, we do 
not all or always have the option of buy- 
ing a solution to a problem; most of us 
have more problems than money. And 
there are not always solutions for sale. 

An alternative approach is an Ap- 
plesoft program to produce the desired 
lower case and punctuation. I have look- 
ed for such a program and I found two 
possibilities (there likely are others but I 
am not acquainted with them): 

1. Val J. Golding in "Lower Case 
Routine for Integral Data 



Printer," Call-Apple, v.2, p. 11 
(April/May 1979) gave a program 
to poke lower case characters 
into strings in the string array 
memory space. 

2. Another program was 
published in Contact, v.1, p.5 
(May 1978); this program pokes 
lower case into the beginning of 
program memory space. 

Both of these are quite limited. Note: both 
should work for punctuation problems 
within the same limitations. 

Neither of these enables one to enter 
lower case or problem punctuations con- 
veniently into string variables, nor to print 
statement strings in an Applesoft pro- 
gram as desired. The program given in the 
listing in Figure 1 does the job for string 
variables and the one given in Figure 2, 
for strings in print statements. 

Use and Operation 

The heart of these programs is the 
same as in the cited programs: use of the 
GET command to sneak things around 
the interpreter. The GET command 
handles input character by character so 
that each can be manipulated. 

(The identical GET routine is used for 
both programs— lines 63010 to 63120 in 
the first and lines 63140 to 63150 in the 
second. Only one typing needs be done, a 
hint not to be ignored.) 

The first program is intended for use as 
a subroutine. For example, a statement 
such as 

30 INPUT "ACCOUNT NAME";NAME$(1) 
can be replaced directly by 

30 PRINT "ACCOUNT NAME";: GOSUB 
63000:NAME$(1) = BB$ 



In a run, the program would appear to 
behave normally except that there would 
be no ?EXTRA IGNORED's and NAME(1) 
would look quite strange on the CRT 
monitor (",/7%2 #!3%" for "lower case") 
and as lower case only on the printer. 

In both programs, capitals are entered 
in a manner similar to the operation of 
MUSE's word processor program Dr. 
Memory. A ctri-A makes the next letter on- 
ly captial; an ctrl-C makes all the follow- 
ing letters capital until either a ctrl-S or 
the end of the string. Unlike Dr. Memory, 
the control characters are not displayed. 
Instead, the capitalized letters are shown 
in inverse video. I like this way of doing 
things. If you would prefer the opposite 
video, just interchange the words NOR- 
MAL and INVERSE in lines 63020-63040 
and 63080 and add an INVERSE to line 
63000 in Figure 1. You could do even more 
to tailor to your personal tastes; change 
the control characters, change the 
default operation from lower case to 
capitals, etc. These custom fittings are 
left as an exercise. 

Another feature common to both pro- 
grams is the motion of the cursor. The 
backspace works but that is all. And it 
will move the cursor back no further than 
the initail position. However, therein lurks 
a minor nuisance; if you try to backspace 
beyond that limit, the immediately 
preceeding character will be wiped out or 
replaced by a white block. This is of no 
consequence; ignore it. 

Since the string variables subroutine 
runs as a part of your program, you have 
to keep labels straight. This subroutine 
uses only AA$, AZ$, BBS, B8, BZ$, and ZZ 
and has no FOR loops. Also note that on- 
ly the usual limitation applies for the 
length of strings. 

In the use of the second program, you 
append it to the program in which you 



May, 1980 



MICRO — The 6502 Journal 



24:45 



want to put lower case. A RUN 63000 initiates things; you simply 
give the line number in which lower case is wanted. The first str- 
ing in that line is printed, terminated by ## to indicate the length 
limit. The cursor below this line indicates the place for the 
change. You can insert anything but we assume that a mixed 
capital and lower case rendition of the line above is what you 
will want. In any case, the length cannot be exceeded. If you go 
over the limit, the excess will be ignored. If you put in less, the 
remainder will be filled with spaces. If you don't want to change 
that particular string, simply hit RETURN. 



Figure 1 

63000 BB$ * n ":BZ$ = " H :BB * 0:ZZ 

* 
63010 GET AA$:AZ$ = AA$ : IF ASC 

(AA$) * 13 THEN NORMAL : GOTO 

63130 
63020 IF ASC (AA$) - 1 THEN ZZ « 

1: INVERSE :BB - 0: GOTO 630 

10 
63030 IF ASC (AA$) = 3 THEN BB * 

1: INVERSE : GOTO 63010 
630U0 IF ASC (AA$) «= 19 THEN BB 

« 0: NORMAL : GOTO 63010 
63050 IF ZZ - 1 OR BB - 1 THEN Z 

Z - 0: GOTO 63080 
63060 IF ASC (AA$) < 65 OR ASC 

(AA$) > 90 THEN 63080 
63070 AA$ " CHR$ ( ASC (AAS) ♦ 3 

2) 
63080 BZ$ * BZ$ + AZ$: PRINT AZ$; 

: I F BB « THEN NORMAL 
63090 BB$ - BB$ + AA$: IF ASC (B 

B$) - 8 AND ASC (AA$) « 8 THEN 
PRINT " "; 
63100 IF LEN (BB$) < - 2 AND ASC 

(AA$) « 8 THEN BB$ » "":BZ$ = 

"": GOTO 63010 
63110 IF ASC (AA$) - 8 THEN BB$ 
= LEFT$ (BB$, LEN (BB$) - 

2) 
63120 GOTO 63010 
63130 PRINT : RETURN 
63140 END 



Figure 2 

62999 END 

63000 HOME : VTAB (3): PRINT "LO 
WER CASE INSERTION PROGRAM": 

PRINT : PRINT 
63010 LMAX >= 62999: PRINT "NUMBER 

OF FIRST LINE TO BE RE-": INPUT 
"WRITTEN ";LT: PRINT 
63020 PRINT :M * 256 * PEEK (10 

4) + PEEK (103) + 2 
63030 LN « 256 * PEEK (M + 1) + 

PEEK (M): IF LN > = LMAX OR 
LN > LT THEN 63320 
63040 IF LN < > LT THEN M = 256 



* PEEK (M - 1) ♦ PEEK (M - 

2) ♦ 2: GOTO 63 03 
63050 K = 0:LL •= 0:UL = 
63060 FOR J - M ♦ 2 TO M ♦ 255 :T 

ST - PEEK (J): IF TST ■= THEN 

M = J ♦ 3: GOTO 63030 
63070 IF TST = 58 THEN K - 
63080 IF TST = 186 OR TST - 132 THEN 

K * 1 
63090 IF K ■= 1 AND LL > AND TS 

T ■ 3«t THEN UL - J - 1: GOTO 

63120 
63100 IF K = 1 AND LL = AND TS 

T - 34 THEN LL « J + 1 
63110 NEXT 
63120 BBS ■ "":BZ$ « "":BB = 0:ZZ 

- 
63130 FOR I - LL TO UL: PRINT CHR$ 

( PEEK ( I )); : NEXT : PRINT " 

##" 
63140 GET AA$:AZ$ - AA$: IF ASC 

(AA$) = 13 THEN NORMAL : GOTO 

63260 
63150 IF ASC (AA$) - 1 THEN ZZ - 

1: INVERSE :BB - 0: GOTO 631 

40 
63160 IF ASC (AA$) = 3 THEN#BB - 

1: INVERSE : GOTO 63140 

63170 IF ASC (AA$) = 19 THEN BB 

= 0: NORMAL : GOTO 63140 
63180 IF ZZ = 1 OR BB = 1 THEN Z 

Z = 0: GOTO 6321C 
63190 IF ASC (AAS) < 65 OR ASC 

(AAS) > 90 THEN 63210 
63200 AAS - CHRS ( ASC (AA$) ♦ 3 

2) 
63210 BZS = BZS ♦ AZS: PRINT AZS; 

: IF BB = THEN NORMAL 
63220 BBS - BB$ + AA$ : IF ASC (8 

BS) = 8 AND ASC (AA$) « 8 THEN 
PRINT " "; 
63230 IF LEN (BBS) < * 2 AND ASC 

(AA$) = 8 THEN BBS = "":BZ$ = 

"": GOTO 63140 
63240 IF ASC (AAS) = 8 THEN BBS 
= LEFTS (Bb$, LEN (BBS) - 

2) 
63250 GOTO 6314C 
63260 IF BBS = "" THEN 63310 
63270 PRINT : FOn I = LL TO UL 
G3280 DD$ = MIO$ (BBS, I - LL * 1 

,1):MM = ASC (DOS) 
63290 POKE I ,MM 
63300 NEXT 
63310 UL = 0:LL = 0: PRINT : GOTO 

63110 
63320 PRINT : PRINT "NUMBER OF N 

EXT LINE TO BE REWRITTEN": INPUT 

"(ENTER TO END PROGRAM) " 

;LT 

63330 IF LT = THEN END 
63340 GOTO 63020 
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After a RETURN, the next string in the same line will appear, 
ready to be changed. When all the strings of that one line have 
been dealt with, you are asked for the number of the next line. 

^fc As mentioned above, lower case if displayed by the APPLE ad 
W keyboard symbols other than letters. These print properly as 
lower case on a printer that prints lowercase. If you want to 
display say, a table so that you can check data prior to printing, 
you need to program the display table and the printout table 
seperately. For convenience in doing this, both programs pro- 
vide an all-caps string BZ$ ad well as the corresponding string 
BBS with lowercase. 

Program Design 

The GET routine, essentially the whole of Figure 1, has 
already been mentioned. The GET command is follwed by a 
series of IF's to implement the control character.backspace and 
RETURN functions. These are straight-forward and self- 
explanatory. 

The second program, Figure 2, consists of three parts. The 
first, lines 63020-63300, pokes the new string into the program 
into the program memory space. 

Concluding Remarks 

Although written for Applesoft, these programs can be 
adapted to other BASIC's.The first presents no problems. 
However, the program memory space search routine in the se- 
cond will require modification for other computers. This 
modification should not be too difficult to implement for other 
Microsoft BASIC' s. 



A 




Educational 
Software 

Professionals 



Apple-Grammer Written by Tom Ankofski. This is a pro- 1 
gram which utilizes the basic skills of grammar. Nouns, | 
verbs, pronouns, adjectives, adverbs, prepositions and | 
conjuctions are presented in sentence— quiz form to the | 
student. The program allows the teacher to chooses 
specific areas of grammar that need attention and to = 
alter the quiz easily. It provides positive reinforcement to = 
the child by correcting his work in color graphics and a 
scoring at the end. This program was a winner of ADS = 
and NCC (National Computer Convention).Requires | 

minimum of 16K Applesoft. = 

Tape $14.95 = 
j Disk 19.95 1 



» A COMPUTER 
EQUIPMENT 
& SOFTWARE 
RARGAINS 



■ CDfllPUTBR SHOPPBR 



• Gel Your 
First Issue FREE! 



(TRS-SO's at Super Discount PrjCM] 



EVERY MONTH 

BUY, SELL OR TRADE ALL TYPES OF COMPUTER 
EQUIPMENT AND SOFTWARE (pre-owned and 
new) among 20,000 readers nationwide. 

FEATURES: 

• Low classified ad rates - 10$ a word 

• Hundreds of ads from individuals 

• Categorized ads so you can find them instantly 

• Large (11 by 14") easy to read pages 

Subscribe now for $10 and receive 13 issues/year 
(one FREE plus 12 regular issues). After receiving 
your first issue if you're not completely satisfied 
you may have a 100% refund and you still keep the 
first issue free. Bank cards accepted. 
BONUS: // you have something to advertise (pre- 
owned or software) send in a classified ad with your 
subscription and we'll run it FREE. 

fi> The Nationwide Marketplace tor Computer Equipment 

m camPUTBR shdppsr 

tr* P.O. BOXFI6 • TITUSVILLE. FL 32780 • 305-269-3211 



Study Quiz Files This self-explanatory program allows \ 
you to create and run study quizzes, save them on disk < 
and retrieve tham at will. Many quizzes can be stored on \ 
this one disk. Review your items, revise them, add items, j 
delete items without any computer programming ; 
knowledge. Written by a liscenced psychologist, the pro- 
gram includes ramdom question presentation, reinforce- 
ment of correct answer, with a display of the student's 
name, immediate right answer feedback after in correct 
I responses, color congratulation display at the end and a 
j final score summary. Guided instructions are easy to 
i understand and follow even the first time around. Pupils 
j can work independently selecting the appropriate quiz 
i and running it with little or no supervision. Requires 32K 

I Applesoft RAM or ROM. 

I Disk $19.95 

■ MULTIPLE CHOICE FILES Same program as Study Quiz 

■ Files but allows different quiz presentation. 

s Disk $19.95 



1 Postage and handling per order: $1.00 
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= 38437 Grand River 5 

iFarmington Hill, Ml 48108 | 
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SYM-1, 6502-BASED MICROCOMPUTER 

FULLY-ASSEMBLED AND COMPLETELY INTEGRATED SYSTEM that's 
ready-to-use 

ALL LSI IC'S ARE IN SOCKETS 

28 DOUBLE-FUNCTION KEYPAD INCLUDING UP TO 24 "SPECIAL" 
FUNCTIONS 

EASY-TO-VIEW 6-DIGIT HEX LED DISPLAY 
KIM-1* HARDWARE COMPATIBILITY 

The powerful 6502 8-Bit MICROPROCESSOR whose advanced 
architectural features have made it one of the largest selling "micros" 
on the market today. 

THREE ONBOARD PROGRAMMABLE INTERVAL TIMERS available to 
the user, expandable to five onboard. 

4K BYTE.ROM RESIDENT MONITOR and Operating Programs. 
Single 5 Volt power supply is all that is required. 
IK BYTES OF 2114 STATIC RAM onboard with sockets provided for 
immediate expansion to 4K bytes onboard, with total memory expan- 
sion to 65, 536 bytes. 

USER PROM/ROM: The system is equipped with 3 PROM/ROM ex- 
pansion sockets for 2316/2332 ROMs or 2716 EPROMs 
ENHANCED SOFTWARE with simplified user interface 
STANDARD INTERFACES INCLUDE: 
— Audio Cassette Recorder Interface with Remote Control (Two 

modes: 135 Baud KIM-1" compatible. Hi-Speed 1500 Baud) 
— Full duplex 20mA Teletype Interface 
— System Expansion Bus Interface 
— TV Controller Board Interface 
—CRT Compatible Interface (RS-232) 

APPLICATION PORT: 15 Bi-directional TTL Lines for user applications 
with expansion capability for added lines 

EXPANSION PORT FOR ADD-ON MODULES (51 I/O Lines included in 
the basic system) 

SEPARATE POWER SUPPLY connector for easy disconnect of the d-c 
power 
AUDIBLE RESPONSE KEYPAD 




Synertek has enhanced KIM-1 ' software as well as the hardware. The 
software has simplified the user interface. The basic SYM-1 system is 
programmed in machine language. Monitor status is easily accessible, 
and the monitor gives the keypad user the same full functional capabili- 
ty of the TTY user. The SYM-1 has everything the KIM-1* has to offer, 
plus so much more that we cannot begin to tell you here. So, if you want 
to know more, the SYM-1 User Manual is available, separately. 
SYM-1 Complete w /manuals $229.00 

SYM-1 User Manual Only 7.00 

SYM-1 Expansion Kit 60.00 

Expansion includes 3K of 21 14 RAM chips and 1-6522 I/O chip. 
SYM-1 Manuals: The well organized documentation package is com- 
plete and easy-to-understand. 

SYM-1 CAN GROW AS YOU GROW. Its the system to BUILD-ON. Ex- 
pansion features that are soon to be offered: 

"BAS-1 8K Basic ROM (Microsoft) $89.00 



* KTM-2 TV interface Board 3 ; , q , 

*We do honor Synertek discount coupons 

QUALITY EXPANSION BOARDS DESIGNED SPECIFICALLY FOR KIM-1, SYM-1 & AIM 65 

These boards are set up for use with a regulated power supply such as the one below, but, provisions have been made so that you can add 
onboard regulators for use with an unregulated power supply. But, because of unreliability, we do not recommend the use of onboard 
regulators. All I.C.'s are socketed for ease of maintenance. All boards carry full 90-day warranty. 

All products that we manufacture are designed to meet or exceed industrial standards. All components are first qualtiy and meet full 
manufacturer's specifications. All this and an extended burn-in is done to reduce the normal percentage of field failures by up to 75%. To you, 
this means the chance of inconvenience and lost time due to a failure is very rare; but, if it should happen, we guarantee a turn-around time of 
less than forty-eight hours for repair. 

Our money hack guarantee: If, for any reason you wish to return any board that you have purchased directly from us within ten (10) days after 
receipt, complete, in original condition, and in original shipping carton; we will give you a complete credit or refund less a $10.00 restocking 
charge per board. 



„< 



VAK-1 8-SLOT MOTHERBOARD 

This motherboard uses the KIM-4" bus structure. It provides eight (8) 
expansion board sockets with rigid card cage. Separate jacks for audio 
cossette, TTY and power supply are provided. Fully buffered bus. 
VAK-1 Motherboard $139.00 

VAK-2/4 16K STATIC RAM BOARD 

This board using 2114 RAMs is configured in two (2) separately 
addressable 8K blocks with individual write-protect switches. 

VAK-2 16K RAM Board with only $239.00 

8K of RAM ( Vi populated) 
VAK-3 Complete set of chips to $125.00 

expand above board to 16K 
VAK-4 Fully populated 16K RAM $325.00 

VAK-5 2708 EPROM PROGRAMMER 

This board requires a +5 VDC and +12 VDC, but has a DC to DC 



multiplyer so there is no need for an additional power supply. All 

software is resident in onboard ROM, and has a zero-insertion socket. 

VAK-5 2708 EPROM Programmer $249.00 

VAK-6 EPROM BOARD 

This board will hold 8K of 2708 or 2758, or 16K of 2716 or 2516 
EPROMs. EPROMs not included. 

VAK-6 EPROM Board $119.00 

VAK-7 COMPLETE FLOPPY-DISK SYSTEM (See March Issue ol Micro) 

VAK-8 PROTYPING BOARD 

This board allows you to create your own interfaces to plug into the 
motherboard. Etched circuitry is provided for regulators, address and 
data bus drivers; with a large area for either wire-wrapped or soldered 
IC circuitry. 

VAK-8 Protyping Board $39.00 



POWER SUPPLIES 

All POWER SUPPLIES are totally enclosed with grounded enclosures for safety, AC power cord, ond carry a full 2-year warranty. 
FULL SYSTEM POWER SUPPLY 
This power supply will handle a microcomputer and up to 65K of our KIM-1 * Custom P.S. provides 5 VDC @ 1.2 Amps 

VAK-4 RAM. ADDITIONAL FEATURES ARE: Over voltage Protection on 5 an d +12 VDC @ .1 Amps 

volts, fused, AC on/off switch Equivalent to units selling for S225.00 or KCP-1 Power Supply $39 00 

more. 

Provides +5 VDC @ 10 Amps & ±12 VDC I 
VAK-EPS Power Supply 



1 Amp 




SYM-1 Custom P.S. provides 5 VDC 
$119.00 VCP-1 Power Supply 

*KIM is a product of MOS Technology 



1 .4 Amps 



$39.00 
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ENTERPRISES 

INCORPORATED 



2967 W Fairmounl Avenue 
Phoenix AZ 85017 
(602)265-7564 







PO Box 6502 
Chelmsford, Mass 01824 

617-256-5515 

"The BEST of MICRO Volume 1" contains all of the impor- 
tant material from the first six issues of MICRO in book 
form. 

"The BEST of MICRO Volume 2" contains all of the impor- 
tant material from the second six issues [#7 to 12] of 
MICRO in book form. 

"ALL of MICRO Volume 2" is all six issues of Volume 2, 
issues 7 to 12, at a special reduced price for a limited time 
while supplies last. 

Back Issues: 



Issues 7 to 12: 
Issues 13 on: . 



All payments must be in US dollars. 

Make checks payable to: MICRO 

Foreign payments in International Money Order or cash. 



Subscription: One Year = 12 issues. Circle correct cate- 
gory and write amount in space provided. 

Surface: 

United States $15.00 

All Other Countries $18.00 



Air Mail: 




Central America 
Europe/So. America 
All Other Countries 


$27.00 
$33.00 
$39.00 


"BEST of MICRO Volume 1" 
Surface 
Air Mail 


$7.00 
$10.00 


-BEST of MICRO Volume 2" 
Surface 
Air Mail 


$9.00 
$13.00 


"ALL of MICRO Volume 2" 
Surface 
Air Mail 


$9.00 
$13.00 



No. 



No. 



Surface @ $1.75 each 
Air Mail @$2.75 each 
Surface @ $2.25 each 
Air Mail @ $3.25 each 



TOTAL 



= $ 

= $ 

$ 



If you are a subscriber, attach label or write subscription number here: 



Name: 



Address: 



City: 

Country (if not U.S.): 

Help MICRO bring you the info you want by completing this short questionnaire. 
Microcomputers Owned/Planning to Buy: AIM SYM KIM PET APPLE OSI Other: . 
Peripherals Owned/Planning to Buy: Memory Disk Video Printer Terminal Other: . . 

Microcomputer Usage: Educational Business Personal Control Games Other: 

Languages Used: Assembler BASIC FORTH PASCAL Other: 

Your comments and suggestions on MICRO: 



State: Zip: 



Name: . . . 
Location: 



Club/Group User Registration Form 
President: 



No. of Members: 

Meeting algorithm (date, time, place): 



Publications: 



Aim/Purpose of the group: 

For Current Information, Contact: 



Software/Hardware Catalogue Entry 

Do you have a software or hardware package you want 
publicized? Our Software and Hardware Catalogues offer a 
good opportunity to receive some free advertisement. These 
regular features of MICRO are provided both as a service to 
our readers and as a service to the 6502 industry which is work- 
ing hard to develop new and better software and hardware pro- 
ducts for the 6502 based system. There is no charge for 
listings in these catalogues. All that is required is that material 
for the listing be submitted in the listing format. All informa- 
tion should be included. We reserve the right to edit and/or re- 
ject any submission. We might not edit the description the 
same way you would, so please, be brief and specific. 

Name: 

System: 

Memory: 

Language: 

Hardware: 

Description: 

Copies: 

Price: 

Author: 

Available from: 



Classified Ad 

Classified ads provide an economical way to announce 
new products or sales promotions, generate product interest, 
enhance visibility and promote good will. MICRO clusters 
large format classified ads at high impact locations 
throughout each issue. Because classifieds represent a ser- 
vice to readers, MICRO must restrict each advertiser to a 
single, six-line insertion per issue. The nominal $10 charge 
reflects our preparation costs and must be prepaid. 

Description: 

Name: 

Address: 

City.State: Zip: 



Other 

If you are interested in Writing for MICRO, becoming a 
MICRO dealer or advertising in MICRO, please indicate below 
and the information will be mailed to you. 



Dealer Information Package: 
Advertiser's Media Package: 
MICRO Writer's Guide: 



First 

Class 

Stamp 



| QajQCa®"]) 



P.O. Box 6502 
Chelmsford, MA 01824 
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SYM - 1 Sends Morse Code 



Now you can use your SYM as a Morse Code teaching 
tool, automatic I.D'er or 'canned' message sender. 



Ralph R. Orton 

16015 San Fernando Mission Blvd. 

Granada Hills, CA 91344 



' 









Although many Morse Code oriented 
programs have been written ranging from 
simple message loops to quite flexible 
code reading routines, I have not yet seen 
any written specifically for the SYM-1. 
The following will fill this gap with a sen- 
ding program that could be used as a 
teaching tool, automatic I.D.'er or as a 
short cut for sending often senl 
messages. About 25 words can be stored 
with the 1K memory that comes with the 
SYM-1. An additional 50 words can be 
stored for each additional 1 K memory ad- 
ded; thus, the 4K board RAW memory 
capability could store a total of about 175 
words. This may not seem like a lot yet; 
teaching code at 5 wpm (words per 
minute), one would have over one half 
hour of steady material. Even at 13 wpm, 
you would have over 10 minutes of prac- 
tice; no easy task for a learner! Figure 1 is 
a simple circuit for interfacing to the 
SYM-1 to provide an audio code indicator. 
Headphone jacks for several people 
could possibly be paralleled instead of 
the loud speaker. Other interfaces are left 
to the needs of the reader. 

Pressing an 'O' on the keyboard enters a 
'DIT' into memory. A '1' enters a 'dah' and 
a '2' enters a 'space' (enter 1 between let- 
ters and 3 between words). Spaces bet- 
ween parts of a letter need not be entered 
as they are provided by the program. 
Entering a '3' ends a message segment. 
This is only required if a series of 
messages are being entered. (See list of 
key memory locations.) As dits, dahs and 
spaces are entered from the keyboard on 
the SYM-1°'s, 1's and 2's appear on the 
display, indicating the data entered. Entry 
errors can be corrected by entering an 'E' 
for each entry to be erased. For example, 
if two erroneous entries had just been 
made, pressing 'E' twice would cause 'E' 
to be displayed twice. This indicates that 
the two prior entries had been erased (see 
figure 2). Upon completion of data entry, 
press the 'GO' key and your message will 
be sent. 



A popular method of teaching code is 
to send letters at a fast rate but leaving 
larger than normal spaces between let- 
ters until the learner has reached the 
desired plateau of proficiency. 

The rate modification table can be us- 
ed to determine data to be entered for 
desired combination of letter speed ver- 
sus words per minute. Dit delay factor is 
entered at 0091 and the space factor is 
entered at 0076. 

If continuous loop has been programm- 
ed at 004A through 004C, then code will 
be sent until such time reset is ac- 
complished. If multiple message has 
been programmed, then a "GO" "OR" at 
the end of each segment will cause the 
nest segment to be sent. 

It should be noted that a GO command 
at 002D will cause a new start to occur 
regardless of the mode selected. Thus, it 
is not necessary to reprogram old data 
unless it has been lost due to a newer en- 
try. 

These Characters Have Been Erased 



^X 






1 


1 


1 


E 


E 



0053: Data at this location deter- 
mines times Dit delay will be executed 
per 'Dit'. 

0067: Data at this location deter- 
mines times Dit delay will be 
executed per 'DAH'. 

0076: Data at this location deter- 
mines times Dit delay will be 
executed per 'Space'. 

007D: Data at this location deter- 
mines times Dit delay will be 
executed per silence between 
parts of a letter of spaces. 

0091: Data at this location deter- 
mines times delay programmed 
by "DIVFAC" (Division Factor) 
will be executed, (e.g. if 'Divfac' 
= 1024 then 1 loop = 1.024 ms 
disregarding instruction time 
error. Part of "Ditdly" routine. 

0093: Data at this location deter- 
mines divison factor to be used 
by internal timer. 1C = * 1; 1D 
= * 8; 1E = * 64; 1F = * 
1024. Part of "Ditdly routine." 



04A thru 004C: These locations 
control the mode of operation. 

4C 35 00 Gives continuous loop 
message. Be sure to put enough spaces 
at the beginning or end to identify the 
start of each loop through. 

4C A2 00 Gives single or multi- 
ple message as 
desired. For multiple 
messages, key-in 'GO' 
'CR' to start next 
message. 
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RATE MODIFICATION TABLE 

The timing in the table is based on the 
following relationships for standard 
code: 

1. A dit is a reference unit of time. 

2. A dah = 3 dits 

3. Average letters = 6.2 dits 

4. Spaces in a letter = 1 dit 

5. Spaces between letters = 3 dits 

6. Words = 5 letters & appropriate 
spaces 

"Space" multiplication factor = 

60 + d - d (43 Wm - 3) 
d(7W-3) 

Where d = dit time of standard words per 

minute rate 

Wm = words per minute of the desired 

modified rate. 

"dit time" = 

60 
50WS-7 

Where Ws = words per minute of the 
desired standard rate. 

The above formulas neglect the opera- 
tion times of the SYM-1 but for practical 
purposes are quite accurate. The results 
must be converted to Hex for jse in the 
program, introducing a rounding error 
which is also normally inconsequential. 
Greater accuracy is obtainable ofcourse, 
but the author leaves it to those with the 
desire to make the needed changes. 



15K 




w 



10.K 



+ 5 Volts 



From application connector 

Pin 2 or 3 or 4 or 5 or 6 or 7 or 8 or 14 ' K 



10K 

> y/V\A 




S|j< 



Figure 1 



0090: 

0100: 

01 10: 

0120: 

0130: 

0140: 

0150: 

01 60: 

0170: 

0180: 

0190: 

0200: 

0210: 

0220: 

0230: 

0240: 

0250: 

0260: 

0270: 

0280: 

0290: 

0300: 

0310: 

0320: 

0330: 

0340: 



00A6 
00A6 
00A6 
0000 

0000 
0002 

0005 

0008 

000B 

000D 

000F 

001 1 

0013 

0014 

0016 

0018 



AO 
20 
20 
99 
C9 
PO 
C9 
FO 
C8 
CO 
FO 
4C 



00 
86 
1B 
00 
47 
1E 
45 
OD 

00 

03 
05 



8B 
8A 
02 



00 



001 B E6 OA 

001 D 4C 05 00 

0020 88 

0021 CO FF 
0023 FO 03 



EQUATE LIST 

WORDS • $000A 

INCHR • $8A1B 

ACCESS • $8B86 

ORG $0000 



LOAD 



LDYIM $00 



JSR 



ACCESS 



SHOKEY JSR INCHR 

STAY $0200 

CMPIM $47 

BEQ START 

CMPIM $45 

BEO ERASE 
INY 

CPYIM $00 
BEQ 
JMP 



WORDS ARE STORED STARTING AT $0200 

WAS 'CO' KEY PRESSED ? 

IF YES - START SENDING CODE 

WAS 'E' PRESSED ? 

IF YES - DO ERASE ROUTINE 

256 WORDS COMPLETED ? 
BASELD IF SO, INCREMENT HI BYTE OF BASE 
SHOKEY 



BASELD INCZ 
JMP 



WORDS 
SHOKEY 



ERASE DEY 

CPYIM $FF PAGE CROSSING ? 

BEQ SUBASE IF YES - DECREMENT HIGH BYTE OF BASE 



g| 









0350: 

0360: 

0370: 

0380: 

0390: 

0400: 

0410: 

0420: 

0430: 

0440: 

0450: 

0460: 

0470: 

0480: 

0490: 

0500: 

0510: 

0520: 

0530: 

0540: 

0550: 

0560: 

0570: 

0580: 

0590: 

0600: 

0610: 

0620: 

0630: 

0640: 

0650: 

0660: 

0670: 

0680: 

0690: 

0700: 

0710: 

0720: 

0730: 

0740: 

0750: 

0760: 

0770: 

0780: 

0790: 

0800: 

0810: 

0820: 

0830: 

0840: 

0850: 

0860: 

0870: 

0880: 

0890: 

0900: 

091 0: 

0920: 

09^0: 

0940 

0950: 

0960: 

0970 

0980 

0990 

1000 

ID- 



0025 4C 05 00 

0028 C6 0A 
002A 4C 05 00 



002D 
002F 
0032 
0035 
0037 
0039 
003B 
003E 
0040 
0042 
0044 
0046 
0048 
004A 



A9 
8D 
8D 
A9 
85 
AO 
B9 
C9 
FO 
C9 
FO 
C9 
FO 
4C 



FF 

01 

03 

02 

3D 

00 

00 

30 

OB 

31 

1B 

32 

2B 

A2 



JMP 

SUBASE DEC 
JMP 

START LDAIM 
STA 
STA 

KEEPON LDAIM 
STAZ 
LDYIM 
LDAY 
CMPIM 
BEQ 
CMPIM 
BEO 
CMPIM 
BEO 
JMP 



AO 
AO 



02 CODE 



00 MODE 



SHOKEY 

WORDS 
SHOKEY 

$FF 

SA001 

$A003 

$02 

$3D 

$00 

$0200 

$30 

DIT 

$31 

DAH 

$32 

SPACE 

SEGMKT 



START OF SENDING CODE 

'MODE' JUMPS HERE FOR LOOP 

CODE WAS STORED STARTINC AT $0200 
IS IT A DIT ? 

GO TO DIT ROUTINE 

DAH ? 

CO TO DAH ROUTINE 

SPACE CHARACTER ? 

GO TO SPACE ROUTINE 



IF SO 
IS IT 
IF SO 
IS IT 

IF SO 



NONE OF ABOVE 



DECIDE MODE 



004D A9 00 
004F 8D 01 AO 
0052 A9 01 
0054 85 FF 
0056 20 90 00 
0059 A9 FF 
005B 8D 01 AO 
005E 4C 7C 00 

0061 A9 00 

0063 8D 01 AO 

0066 A9 03 

0068 85 FF 

006A 20 90 00 

006D A9 FF 

006F 8D 01 AO 

0072 4C 7C 00 

0075 A9 01 
0077 85 FF 

0079 20 90 00 

007C A9 01 
007E 85 FF 

0080 20 90 00 

0083 C8 

0084 CO 00 
0086 FO 03 
0088 4C 3B 00 

008B E6 3D 
008D 4C 3B 00 

0090 A? 47 
0092 8D 1F A4 
0095 2C 05 A4 
0098 10 FB 
009A E8 
009B E4 FF 
009D DO F1 
009F A2 00 
00A1 60 

00A2 00 

00A3 4C 83 00 



DIT 



LDAIM $00 

STA $A001 

LDAIM $01 

STA $OOFF 

JSR DITDLY 

LDAIM $FF 

STA $A001 



SET OUTPUT LOW 

LOAD 1 FOR DIT DELAY 

STORE FOR USE BY 'DITDLY' 



SET OUTPUT HIGH AGAIN 



DAH 



SPACE 



JMP 

LDAIM 

STA 

LDAIM 

STA 

JSR 

LDAIM 

STA 

JMP 

LDAIM 

STA 

JSR 



SILENT LDAIM 
STA 
JSR 

INCMEK INY 

CPYIM 

BEO 

JMP 

BASEGO INC 
JMP 

DITDLY LDAIM 
DIVFAC STA 
TIMER BIT 
BPL 
INX 
CPX 
BNE 
LDXIM 
RTS 

SEGMNT BRK 
JMP 



SILENT 

$00 

?A001 

$03 

$OOFF 

DITDLY 

$FF 

?A001 

SILENT 

$01 

$OOFF 

DITDLY 

$01 

$OOFF 

DITDLY 

$00 

BASEGO 
CODE 

CODE 
CODE 

$47 
$A41F 
SA405 
TIMER 

JOOFF 

DITDLY 

SOO 



SET OUTPUT LOW 

LOAD FOR 3 DIT DELAYS 

STORE FOR USE BY 'DITDLY' 



SET OUTPUT HIGH ACATN 
QUIET BETWEEN CHARACTERS 

LOAD $0076 FOR DESIRED SPACE 

LENGTH AND STORE FOR USE BY 'DITDLY 



LOAD FOR 1 DIT DELAY 
STORE FOR USE BY 'DITDLY' 

MOVE POINTER TO NEXT CHARACTER 

PAGE CROSSINC ? 

IF YES - INCREMFNT HIGH BYTE BASE 



+02 

GET NEXT CHARACTER 

LOAD $0091 WITH DESIRED DIT TIME 



KEEP CHECKING FOR DELAY COMPLETED 
DONE - INCREMENT DIT COUNTER 
SHOULD WE DITDLY AGAIN ? 

RESET 'X' REGISTER 

BACK TO WHERE YOU CAME FROM 

STOP UNTIL "GO" "CARRIAGE RETURN 
INCMEM NOW SEND TOM MESSAGE 



SUPER-TEXT™ 



I 



STANDARD FEATURES 

• single key cursor control 

• automatic word overflow 

• character, word and line insertion 

• forward and backward scrolling 

• automatic on screen tabbing 

• single key for entering "the" 

• auto paragraph indentation 

• character, word and line deletion 

• ditto key 

• multiple text windows 

• block copy, save and delete 

• advanced file handling 

• global (multi-file) search and replace 

• on screen math and column totals 

• column decimal alignment 

• chapter relative page numbering 

• complete printer tab control 

• line centering 

• superscripting and subscripting 

• displays UPPER and lower case 
on the screen with Dan Paymar's 
Lower Case Adapter 

FAST EDITING 

Super-Text was designed by a professional writer 
for simple, efficient operation. A full floating 
cursor and multiple text screens facilitate editing 
one section of text while referencing another. 
Super-Text's advanced features actually make it 
easier to operate, allowing you to concentrate on 
writing rather than remembering complicated 
key sequences. 

FLOATING POINT CALCULATOR 

A built in 15 digit calculator performs on-screen 
calculations, column totals and verifies numeric 
data in statistical documents. 



The 

Professional 

Word 

Processor 

for the Apple II 

and the Apple II plus 

MUSE. 

THE LEADER IN QUALITY SOFTWARE 



ADVANCED FILE HANDLING 

Single key file manipulation and complete block 
operations allow the user to quickly piece together 
stored paragraphs and phrases. Text files are 
listed in a directory with a corresponding index 
for fast and accurate text retrieval. 



PRINTER CONTROLS 

Super-Text is compatible with any printer that 
interfaces with an Apple. Print single or multiple 
copies of your text files or link files and they will 
be automatically printed in the specified order. 
User defined control characters can activate most 
special printer functions. 



i 



EXCLUSIVE AUTOLINK 

Easily link an unlimited number of on-line files 
on one disk or from disk to disk. Autolink allows 
you to search or print all on-line files with a single 
command. Typical files of items that can be stored 
in this way include personnel files, prospect files, 
maintenance records, training records and 
medical histories. 



MODULAR DESIGN 

This is a modularly designed system with the 
flexibility for meeting your future word processing 
needs. The first add-on module will be a form 
letter generator for matching mailing lists with 
Super-Text form letters. 



SUPER-TEXT, requires 48K ($99.95) 

Available TODAY at Computer Stores 

nationwide. Dealer inquiries welcome. For more 

information write: 

MUSE SOFTWARE 330 N. Charles Street Baltimore, MD 21201 



(301)659-7212 
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An EDIT Mask Routine in Applesoft BASIC 



This article describes some techniques for producing 
formatted output using Edit Masks. The programs permit 
you to produce professional looking output. 



Lee Reynolds 

801 NE 18th Ct. 109 

Ft. Lauderdale, FL 33305 
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My work as a professional programmer 
in business applications has often called 
for the use of what are called "edit 
masks", in such languages as COBOL, 
DIBOL, and the Commercial Subroutine 
Package of Data General FORTRAN. I 
have found the edit mask capability in 
these languages quite useful, and so I 
decided to write a routine in Applesoft 
Basic that I could use at home on my Ap- 
ple II. 

I should begin by first giving a brief ex- 
planation of what an edit mask is, for 
those readers who have never en- 
countered the term before. An edit mask 
might be defined as a string of characters 
which specify operations on a number so 
as to produce an output string that con- 
tains the number's digits re-formatted for 
printing in certain specific ways. Some of 
the most common operations that can be 
carried out on any given number by 
means of edit masks are the following: (1) 
"suppressing" of zeroes, by replacing 
them with blanks in the output string, (2) 
inserting of a decimal point in a fixed 
position of the output string, (3) inserting 
of comma in the string to express 
thousands, million, etc., (4) placing a 
dollar sign before the leftmost digit of the 
number string, and (5) appending a minus 
sign to the end of the string if the input 
number is negative. 

The edit mask is used as a sort of "pic- 
ture" of what the output string should be 
like after carrying out operations such as 
the above on the number to be edited. In 
order to achieve this, there are defintie 
rules for the edit routine's interpretation 
of the characters that make up the mask. 
Perhaps the best way of explaining this is 
to give some examples of my routine's 
use. 

The routine itself, on the following 
listing, is contained between line 
numbers 100 to 580. The statements 
preceding 100 are a "driver" routine you 



can use to input your edit mask and 
number to be editied in order to experi- 
ment with various types of editing. 

The editing routine is called by means 
of a GOSUB 100. There are two 
arguments that must be passed to it: 
NUM is the number to be edited, and 
MASKS is the edit mask string. NUM can 
contain any number of digits up to 9. I 
have made no provision for editing 
numbers that must be expressed in 
"scientific notation" with an Exponent 
field. 

The result of the masking will be pass- 
ed back to the calling program in the str- 
ing OUTS, whose length is the same as 
MASKS. 

There are six special characters which 
can appear in MASKS that are treated in a 
distinctive way: these are the digit 9, the 
digit 0, the period, the comma, the minus 
sign, and the dollar sign. The mask can 
contain other characters also, but more 
about this later. 

The digit 9 is the "numeric replace- 
ment" character. This means, wherever a 
9 is present in the mask, it will be replac- 
ed in the result field (OUTS) by the cor- 
responding digit of NUM, if any, in that 
position. 

Thus, suppose we define MASKS = 
"99999", and assume the number to be 
edited is NUM = 352. Then the result, 
after calling the edit routine, will be OUTS 
= "352". (Note the two blanks preceding 
the ASCII digit 3. This is because the 
length of the mask exceeds the length of 
the number to edit by two.) 

Next, the digit is the "zero-suppress" 
character. This means wherever a ap- 
pears in the mask, it will be replaced in 
the result field by the corresponding digit 
of NUM only if that digit is not a zero; if 
the digit is a zero, then the corresponding 



position in the result field will be a blank. 



To give an example, suppose MASKS 
= "990990" and the number to be edited 
is NUM = 120563. Then the result will be 
OUTS = "12 563". The zero in NUM was 
suppressed. 

The most common usage of the zero- 
suppress character in a mask is to sur- 
press leading zeroes of a number. Thus a 
mask of "00099" would suppress the first 
three digits of any five-digit number if 
they were zeroes, but would print them if 
they were not. Due to the way my routine 
operates, it turns out that leading zeroes 
are always suppressed, anyway. If you 
would rather change this feature of the 
routine, I will describe later how you 
could go about doing so. 

The period in a mask is usually used as 
the decimal point position. It is what is 
called an "insertion character" in the 
mask because it is always inserted in the 
result field exactly in its corresponding 
position in the mask. 

Let's consider some examples of 
masks containing a period, and what the 
result will be. Suppose our mask is 
"999.99", and our number to be edited is 
312.44; then, as you would expect, the 
result will be OUTS = "312.44". Next sup- 
pose we use the same mask but NUM = 
33.6. The result is OUTS = " 33.60". There 
is a blank in position one and a zero in the 
last position. (If the last character of the 
mask had been a instead of a 9, then the 
last character in the result would have 
been a blank.) Now, let's suppose that 
NUM = 124.556. In this case there is one 
more digit to the right of the decimal 
point in the number to edit that there is in 
the decimal part of the mask. When this, 
or something similar happens, my routine 
will truncate the extra digit(s), and 
replace it (them) by an asterisk to signal 
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field overflow. The result then is OUT$ = 
"124.5"". 

My routine follows a similar rule in 
case the number of digits to the left of the 
decimal point in NUM exceeds the 
number allowed in MASKS. For example, 
if NUM = 1256.7, then the result will be 
OUTS = "" 56.70". 

By the way, since it is conceivable that 
you might, either by mistake or be design, 
include two or more periods in your mask, 
the routine will treat only the rightmost 
period in the mask as the decimal point 
position. All other periods will be treated 
as insertion characters, and so will ap- 
pear in the corresponding positions of 
the result field as they expected. 

Next, let's consider the comma in an 
edit mask. An example of a mask contain- 
ing two commas is the following: MASKS 
= "99,999,999". If your number to edit 
contains either 7 or 8 digits, then the 
result field will contain both commas in 
the appropriate places, as you would ex- 
pect. However, with 6 or fewer digits in 
NUM, either the first or both commas will 
be suppressed and replaced by blanks. 
Examples: if NUM = 1234567, the OUTS 
= " 1,234,567"; and if NUM = 1234, then 
OUTS = " 1,234" (note the five blank 
characters preceding the digit 1); and 
lastly, if NUM = 123, then there will ap- 
pear seven blanks preceding the digit 1: 
OUTS = " 123". 

Thus we see that the comma is a 
special sort of insertion character which 
is suppressed if there are no preceding 
digits of the number to be edited. 

Now consider the dollar sign used as 
an edit mask character. I have defined 
this character's usage in a special way. IF 
the dollar sign is the very first character 
in the mask, then it is treated as what is 
called a "floating dollar signt". That 
means that the dollar sign in the result 
field will "float" to the right, far enough 
so as to immediately precede the left- 
most digit of NUM. Some exaples: if 
MASKS = "$99,999.99" and NUM = 
11.45, then the result of editing is OUTS 
= " $11.45" (note that there are four 
blanks preceding the dollar sign in the 
result field). And if NUM = 2321, then we 
have this result: OUTS = " $2,321.00" 
(one blank preceding the dollar sign). 

Please note that I have defined this 
usage of the dollar sign as a "floating" 
dollar sign only when it is the first 
character in the mask. If it occurs 
elsewhere in the mask, then it becomes 
an insertion character. 

The last special usage character in a 
mask is the trailing minus sign. If the 
mask contains a minus sign as the very 
last character, then the rightmost posi- 
tion of the result field will be a minus sign 



when the number to edit is negative, or 
will be blank if the number is positive. Ex- 
amples: if MASK$ = "99,999.99-" and 
NUM = -1453.62, then the resultant OUT$ 
= " 1,453,62-". While if NUM = 2246.7, 
then we have OUT$ = " 2,246.70". 

If a minus sign appears in a mask in 
any other position, it is treated as an in- 
sertion character. Thus, for example, you 
could format a date, MMDDYY = month, 
day, and year with the following mask: 
MASK$ = "09-99-99". If NUM = 101479, 
then OUT$ = "10-14-79". 

You might be wondering what will hap- 
pen if you edit a negative number using a 
mask which does not contain a trailing 
minus sign. It depends upon whether you 
have allotted enough digit positions in 
the mask to accommodate a leading 
minus sign. If you have then the minus 
sign will take the place of the first posi- 
tion containing a nine, zero, or comma 
that immediately precedes the leftmost 
digit of NUM. If you have not allotted 
enough digit positions in the mask, then 
my routine will print the asterisk signal- 
ing field overflow. 

Now, any character other than the six 
special cases discussed above may also 
appear in a mask. In that case the 
character becomes an insertion 
character. Suppose you define 

MASKS = "$BAI_ DUE AS OF SEP/78: 

If NUM = 1324.57, then the result of mask- 
ing will be: 

OUT$ = "BAL. DUE AS OF SEP/78: 
$1,324.57" 

From the above example, you can see 
that you are only restricted in using edit 
masks by your imagination, perhaps after 
making modifications to my routine. For 
example, you will note that the year in the 
above mask is 78 not 79. It could not be 
79 because the 9 is a numeric replace- 
ment character and in this case would 
have been blanked out. However, if you 
change the numeric replacement char- 
acter to some other more convenient 
character (perhaps an ampersand?) then 
this difficulty could be avoided. 

As already mentioned, another 
modification you might wish to make Is to 
allow outputting of leading zeroes in a 
numeric field if the corresponding edit 
characters are 9's. To do this, you need to 
make three changes to the routine. 



variables used by it in order not to con- 
flict with your own use of the same 
names. So here is a list of all variables us- 
ed by my routine. 

Variables 



V4 



455 IF 1-1 >= I 



500 IF N$ = 
525 IF N$ = 



AND MID$ 
(MASK$,I-1,1): 
"9" then 480 

THEN N$ ="0" 

THEN 460 



MASKS 

NUM 
NUMS 
LM 
LN 

PM 



PN 

RM 

RN 

QM 

QN 
FD% 

MF% 

NF% 

MS 

N$ 



12 



the string containing the 
edit mask. 

the input number to edit 
NUM converted to a string 
length of MASK$ 
length of NUM$ 
position of rightmost 
decimal point in MASK$(or 
zero if none) 

position of decimal point 
in NUM$ (zero if none) 
number of digit positions 
right of decimal point in 
MASK$ 

number of digits right of 
decimal point in NUMS 
number of digit positions 
left of decimal point in 
MASKS 

number of digits left of 
decimal point in NUMS 
flag telling whether mask 
has floating dollar sign (1 if 
yes, if no) 

flag telling whether mask 
has trailing minus sign (1 if 
yes, if no) 

flag telling whether NUM is 
negative (1) or positive (0) 
current character of 
MASKS being processed 
current character of NUMS 
being processed 
loop variable and tem- 
porary variable 
pointer to current digit in 
NUMS 

first position in MASKS to 
process 

last position in MASKS to 
process 



When you incorporate this routine into 
your own programs, you may wish to 
change the names of some of the local 



One final note: in using the driver 
routine to experiment with various edit 
masks, you should remember that if your 
mask will contain commas or colons, 
then you must enclose the entire mask by 
quotation marks, or else Applesoft will 
drop part of your mask when it executes 
the INPUT statement. 

Notes on Converting to other Basics 

I am not familiar with any other Basics 
for microcomputers. I do, however, have 
some acquaintance with the Basic 
languages for two mini-computers— the 
DEC PDP-11 and the Data General Nova 3. 
With this as background, I have compiled 
the following list of possible modifica- 
tions you might have to make to my 
routine to get it to work on other 6502 
machines other than the Apple. 

1.) Applesoft allows variables to have 
names with more than two characters, 
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although only the first two are used to 
distinguish between between different 
names. If your Basic does not allow this, 
you will have to change some of the 
names that my routine uses. 

2.) Some Basics don't allow multiple 
statements per line, or if they do, the 
statement separator might not be the col- 
on; two common alternatives are the back 
slash or the exclamation point. 

3.) If your Basic does not have the 
"ON...GO TO" statement, then line 
number 85 will have to be replaced with 
something else, perhaps a couple of 
"IF...THEN GOTO..." statements. 
4.) Not all Basics allow "NEXT" 
statements which do not specify the loop 
variable to end "FOR" loops. There are 
several lines in my program that may 
necessitate this type of change: 160, 190, 
240, 280, 340, and 550. In all of these 
cases the implied FOR loop variable is 
"I". 

5.) You may have to DIMension your str- 
ings in your Basic program, as is true in 
Apple's Integer Basic, but not Applesoft. 

6.) String concatenation in Applesoft is 
accomplished with string expressions 
joined by means of the plus ( + ) sign; your 
Basic may use the ampersand (&). 

7.) In comparing strings, Applesoft uses 
the combination of less than and greater 
than signs (<>); perhaps, as in Integer 
Basic on the Apple, you are only allowed 
to test inequality with the number sign (#). 

8.) Please note that I have several 
statements in my program of the follow- 
ing general form: IF X THEN... This is 
"shorthand" for the equivalent IF X <> 
THEN... I also have a number of 
statements like the following: IF.. THEN 
100 (where 100 can be any statement 
number). This is a "shorthand" for 
IF...THEN GOTO 100. I don't know 
whether all Basics allow the abbreviated 
forms that I use. 

9.) I have made use of the following string 
functions: STR$, LEFTS, RIGHTS, MIDS, 
and LEN. Your Basic might call these by 
different names, or have different syntax 
rules about their arguments. Here are the 
Applesoft syntactic definitions for these 
functions, which you should keep in mind 
if you have to convert to different usages 
on your computer: 

STR$(X) 

converts the number X to a string 

LEFT$(A$,N) 

returns the leftmost N characters 
of string AS 

RIGHT$(A$,N) 

returns the rightmost N 
characters of string AS 



MID$(A$,M,N) 

returns the N consecutive 

characters of string AS, starting at 

position M 
LEN(AS) 

returns the number of characters 

in string AS 

3LIST 



These are all the differences between 
Applesoft and other Basics that I am 
aware of, although there may be more. At 
any rate, it should not be difficult to con- 
vert my program to any other machine's 
Basic. 



10 REM ROUTINE TO EDIT A NUMBER 
i NUM» WITH AN EDIT MASK* HA 
SK* 

20 HOME t PRINT "EDIT MASK R0UTI 
NE-: PRINT J PRINT " THE E 
DIT MASK CAN CONTAIN ANY INS 
ER-": PRINT "TION CHARACTERS 
t PLUS FOLLOWING SPECIAL" 

30 PRINT "CHARACTERS:": PRINT " 
IF * IS FIRST CHAR., IT IS 
TREATED AS": PRINT "A FL0ATI 
NG DOLLAR SIGN" 

40 PRINT " IF - IS LAST CHAR., 
IT WILL BE OUTPUT": PRINT "I 
F NUMBER TO EDIT IS NEGATIVE 
, OR RE- u : PRINT "PLACED BY 
BLANK IF POSITIVE" 

50 PRINT " 9 CORRESPONDS TO A D 
IGIT TO PLACE IN": PRINT "TH 
AT POSITION OF THE MASK": PRINT 
" CORRESPONDS TO A N0NZER 
DIGIT TO" 

60 PRINT "PLACE IN THAT POSITION 
. IF YOU WANT A": PRINT "COM 
MA OR COLON IN THE MASK*. ENC 
LOSE THE" 

65 print "entire mask in quotes 

to input it.": print 
70 input "edit mask? "jma3k* 
75 input "number to edit? "jnum: 
g0sub 100 : print "edited nu 

mber: m »out$ 
80 print : input "1=neu number , 

2=new mask and number?" jn 

85 ON N GOTO 75,70 
90 GOTO 80 

100 num* = str* (numkln = len 
<num*):lm = len <mask*>:qm ■ 
o:qn =» o:rm = o:rn = o:pn = 
o:pm = o:nf% = o:mf% ■ o:fd% 
= o:dfz = o 

110 OUT* = "": IF NUM < THEN NF 
X = i: REM SET FLAG TELLING 
WHETHER INPUT NUMBER IS NEG 
ATIVE 

120 IF RIGHT* <MASK*,1> ■ "-" THEN 
MFZ = i: REM SET FLAG TELL I 
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NG WHETHER INPUT MASK HAS TR 
AILING MINUS SIGN 
130 IF LEFT* (MASK*,1) = "*" THEN 
FDZ = i: REM SET FLAG TELLI 
NG WHETHER INPUT MASK HAS FL 
OATING DOLLAR SIGN 
140 FOR I = 1 TO LMt REM FIND P 

OSITION OF DECIMAL POINT IN 
MASK 
150 IF MID* (MASK* ,1,1) = ", u THEN 

PM = I 
160 NEXT : IF FDZ = THEN DFX = 
It REM IF NO FLOATING DOLLA 
R SIGN IN MASK, SET FLAG SAY 
ING "$" ALREADY OUTPUT TO ED 
ITED FIELD 
170 FOR I = 1 TO LN: REM FIND P 
OSITION OF DECIMAL POINT IN 
NUMBER TO EDIT 
180 IF MID* (NUM*, 1,1) = "." THEN 

PN = I 
190 NEXT 

200 IF PN THEN RN = LN - PN: REM 
IF DECIMAL POINT IN NUMBERf 
COMPUTE * DIGITS RIGHT OF D 
ECIMAL PT. 
210 IF PM = THEN 250 : REM IF 
DEC. PT. IN MASK, FIND * DIG 
IT POSITIONS RIGHT OF IT 
220 FOR I = LM TO PM STEP - 1 
230 IF MID* (MASK*, 1,1) = "0" OR 
MID* (MASK*, 1,1) = "9" THEN 
RM = RM + 1 
240 NEXT 
250 IF PN = AND PM = THEN 30 


260 IF RM = RN THEN 300 
270 IF RM < RN THEN 290 
280 FOR I = RN TO RM - 1JNUM* = 
NUM* + "0": NEXT : GOTO 300 1 
REM ZERO-FILL RIGHTMOST DE 
CIMAL POSITIONS OF NUM* 
290 I = LN - RN + RM - 1INUM* = LEFT* 
<NUM*,I) + "*": REM TRUNCAT 
E NUM* TO MATCH MASK, PUT "* 
" IN RIGHTMOST DIGIT 
300 QN = LEN (NUM*) - RM: IF PN THEN 
QN = QN - It REM GET * DIGI 
TS LEFT OF DEC. PT. IN NUMBE 
R, IGNORING DEC. PT . , IF ANY 



320 



330 



340 
350 



360 



365 



370 



380 



385 



390 



400 



410 



420 
430 
440 

450 
460 



0" OR 
THEN 



REM 
MA 



FOR I = 1 TO LMt IF I = PM THEN 
350 : REM FIND * DIGITS IN M 
ASK LEFT OF DEC. PT. 
IF MID* (MASK*, 1,1 ) = 

MID* (MASK*, 1,1 ) = "9" 
QM = QM + 1 
NEXT 

IF QM > = QN THEN 370 J 
TRUNCATE NUMBER ON LEFT, 

KING LEFTMOST DIGIT "*" 

I = LEN (NUM*) - QN + QM - 1 

I IF NFZ AND MFX THEN 1=1- 

i; REM DROP MINUS SIGN ALSO 
IF IGNORED BEFORE 
NUM* = "*" + RIGHT* (NUM*, I) 
:qn = QM 

II a i: IF FDZ THEN II = 2X REM 
WILL IGNORE ANY FLOATING DO 

LLAR SIGN IN MASK 
12 = LMt IF MFZ THEN 12 = LM - 
It REM WILL IGNORE ANY TRAI 
LING MINUS IN MASK 
IF NFX AND MF% AND LEFT* (N 
UM*,1 ) = "-- THEN QN = QN + 
It REM IF NUMBER'S MINUS SI 
GN WAS IGNORED BEFORE, PUT I 
T BACK IN 

IF PN THEN NUM* = LEFT* ( NU 
M*,QN) + RIGHT* (NUM*,RM)t REM 

DROP DEC. PT. FROM NUMBER S 
TRING 

IF NFZ AND MFZ AND LEFT* (N 
UM*,1) = "- H THEN NUM* = RIGHT* 
(NUM*, LEN (NUM*) - 1): REM 

DROP MINUS SIGN IF TRAILING 

MINUS IN MASK 
J = LEN (NUM*)t FOR I = 12 TO 
II STEP - i:M* = MID* (MAS 

k*,i,d:n* = " u : if j > o then 

MID* (NUM*,J,1 ) 

< > "," THEN 490 

< > "-" THEN 450 
N* + OUT*: J = J - i: GOTO 



W 



^ 



310 IF NF% AND MF/£ THEN QN = QN - 
i: REM IGNORE MINUS SIGN IN 
NUMBER IF TRAILING MINUS IN 
MASK 



470 

480 
490 
500 



N* = 
IF M* 
IF N* 
OUT* = 
550 

IF N* < > ■ » THEN 480 
IF DFZ THEN 440: REM IF FLO 
ATING DOLLAR SIGN ALREADY OU 
TPUT, GO INSERT BLANK 
DFZ = i:out* = "*" + OUT*: GOTO 

550 
OUT* = M* + OUT*: GOTO 550 
IF M* < > "9" THEN 520 
IF N* = " " THEN 460 : REM I 
F ALL DIGITS OF NUMBER OUTPU 
Tt GO OUTPUT FLOATING DOLLAR 



^ I 
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510 
520 

530 
540 
550 

555 



560 
570 
580 



SIGN OR BLANK 
GOTO 440 t REM GO OUTPUT THE 

DIGIT 
IF H* < > "0" THEN 480 : REM 
GO OUTPUT CURRENT CHARACTER 

IN MASK 
IF N$ < > "0" THEN 500 : REM 

GO OUTPUT BLANK OR DIGIT 
N* = " "t GOTO 440 1 REM OUTP 
UT BLANK 

NEXT t IF DFX = THEN OUT* = 
-$- + OUT*: REM IF FLOATING 

DOLLAR NOT OUTPUT* APPEND I 

T ON LEFT 

IF DFX AND FDX THEN OUT* = " 
- + OUT*t REM IF DOLLAR SI 
GN ALREADY OUTPUT * PUT BLANK 
IN PLACE OF MASK'S DOLLAR S 
IGN 

IF MFX = THEN RETURN : REM 
ALL DONE IF NO TRAILING MIN 
US IN MASK 

N« = " ■: IF NFX THEN N* = " - 
■J REM BLANK IF POSITIVE, M 
INUS SIGN IF NEGATIVE 
OUT* = OUT* + N*: RETURN 



STOCK MARKET ANALYSIS PROGRAM 
DJI WEEKLY AVERAGE 1897-DATE 

ANAr (ANALYSIS 1) is a sel of BASIC Programs which enables the user lo 
perform analyses on Ihe Dow Jones Industrial weekly average data. From 6 
monlhs lo 5 years ol user selected OJI data can be plotted on the entire screen 
in one ol 5 colors using Apples' High Resolution capabilities The DJI data can 
be transformed into different colored graphic representations called transforms 
They are user specified moving averages: a least squares linear lit (best straight 
line)- inters lor time, magnitude, or percentage changes; and user created rela- 
tionships between the DJI data, a transform, or a constant using -.-.x./ operators. 
Colored lines can be drawn between graphic points. Graphic dala values or 
their dates ol occurrence can be displayed in text on the screen. Any graph or 
text can be oulputled to a users printer The Grid Scale is automatically set to 
the range ol the graphs or can be user changed As many colored graphs as 
wanted can be plotted on the screen and cleared at any lime. The user can code 
routines to operate on the DJI/transform data or create his own disk file data 
base ANA1 commands can be used with his routines or dala base. An Update 
program allows Ihe user to easily update the OJI file with current DJI weekly 

The ANA1 two letter user commands are: CA = Calculate, no graph CG = Clear 
Graphs leave Grids. CK • Checking out program, known dala. CO = Color of next 
graph (red. green, violet, white, blue) CS • Clear Screen. OL = Draw Line between 
points Fl * Filter data for time, magnitude, or percent change FU = Dala. trans- 
form or constant Function with -.-.x,/ operator GD ■ Graphic mode, display 
all Graph Data on screen. GR = Graph data to screen GS = Set Grid Scale. HE = Help, 
summary ol any commands usage. LO = Load Data from disk file from inputted 
date to memory LG = Leave Graphs, automatic Grid rescahng. LO = Look, select 
a range ol the LO data and GR: All commands can now be used on this range 
LS = Leasl squares linear lit ol Ihe data MA = Moving Average of the data NS ■ 
No Scale, nexl graph on screen does not use Grid Scale. NT ■ No Trace PR = User 
implimented Printer routine. TO = Text mode, display Text Data on screen ll = 
Time number to date or vice versa TR = Trace TS = Text Stop for number ol lines 
outputted 10 screen when in TD. U1/U2 = User 1/2 implimented routines VO ' 
Values of Data outputted in text VG = Values of Grid; low/high/della VT = Values 
ol Transform outputted in text. 



APPLE" II. 48 K. APPLESOFT 
ROM CARD, DISK II DOS 3.2 
ANA1 DISK & MANUAL . . . S49.95 
(CA residents add 6% sales tax) 



GALAXY 
DEPT. A02 
P.O. BOX 22072 
SAN DIEGO. CA 92122 



• Software Review in Call-A.P.P.L.E. (2/80). "An example of an excellent piece of 
software exploiting most ol Apple lis maior leatures." Overall Rating = 92.1 

• Software Review in Apple Orchard (3/80): "A remarkably flexible approach to the 
analysis and plotting of any time series data." Overall Rating = 85.7 



I r SYNERGISTIC SOFTWARE 1 



Program Line (Editor 



<> 



by Neil Konzen 



Stronger than the Integer 
More powerful than Applesoft 
Faster than a speeding cursor 
Able to leap the longest statements in a 

single move. 
The Program Line Editor is the most sophisticated 
program development tool for the Apple II computer. 
Program Line Editor includes full feature line editors for 
both Integer and Applesoft programs that render all other 
techniques obsolete. Program development and modification 
can now be performed in a tenth the time previously required. 

• More than 1 1 editing commands such as insert, delete, 
find & pack. 

• Versatile escape functions execute a complex user defined 
command with just 2 keystrokes. 

•Complete listing control (stop list, resume, abort) 

• Invisible and indestructible routines actually become part 
of DOS and are unaffected by INT. FP, or MAXFILES. 

Available on disk only for any Apple] [ or Apple] [ Plus for 
$40.00. Introductory price of $37.50 thru April 1980. 




by Darrell & Ron Aldrich 



When the Apple's text out- 
put isn't good enough. Higher 
Text gives you the flexibility o': 

• Full 96 characters of ASCII upper 
and lower case. 
• Colorful text in 10 high resolution colors. 
• Foreign alphabets or scientific symbols. 
•Old English, script, or even sideways text. 

• Mixed text and graphics anywhere on the high 
resolution screen. 

•Choice of normal 7x8 characters or detailed 
14 x 16 dot characters. 

• Regular, extra tall, extra wide, or large characters. 

Higher Text allows you to design unique character sets with 
the easy to use character editors. Graphs, game boards, and 
program logos can be labeled with this versatile package. 
Now you can create professionally customized displays using 
routines that can be easily linked to any Applesoft or Integer 
BASIC program. 

Available on disk only for any Apple ] [ or Apple ] I Plus for 
$35.00. Introductory price of $32.50 thru April 1980. 



Send check or inquiry to Synergistic Software, 5221 120th Ave, S.E., Bellevue, WA 98006 
Washington residents add 5.3% sales tax. 




6502 
MACRO ASSEMBLER 

AND TEXT EDITOR 



Versions for PET, APPLE II, SYM, KIM 
and ATAR I (1st quarter 1980) 
Written entirely in machine language 
Occupies 8K of memory starting at $2000 — 
Apple version with disk occupies just over 
9K 

Macro and conditional assembly 
36 error codes, 26 commands, 22 pseudo ops 
Labels up to 10 characters 
Auto line numbering and renumber com- 
mand 

String search and string search and replace 
Copy, move, delete, load, save, and append 
commands 

Cassette and Manual $49.95 

(including U. S. postage) 

Eastern House Software 



3239 Linda Dr. 



Winston-Salem. N. C. 27106 



TRAP 

65 




For PET, APPLE, SYM, OSI, etc. 
Any 1 mhz 6502! 



— Prevents from "hanging up" via execution 
of unimplemented opcodes! Causes your 
monitor to display location of bad op code! 

— Our computers have stopped crashing! 

— Debugging easier! 

— Easy to install — plugs into 6502's socket. 

TRAP 65 is currently being used to insure that 
there are no bad opcodes in programs before 
submittal for ROM masks! 

We are using TRAP 65 in experiments on 
extending the 6502's instruction set — PHX, 
PHY, INCD. 

$149.95 (Add $4.00 postage, $10.00 foreign) 

Eastern House Software 



3239 Linda Dr. 



Winston-Salem, N. C. 27106 



PET 
RABBIT 




Load, Save, Verify, Execute 
8 K in 38 seconds versus 

PETs 2 Minute 45 seconds, 
plus more! 

High-speed Cassette Routines work with 8K, 16K, or 32K 
new ROM PETs which have the new Commodore cassette 
deck (like the external version which sells for $95.00). 
Note: If you have a new ROM PET with the old style 
lift-top deck, everything but the high-speed cassette 
routines will work. 

— Auto repeat of any key held down, toggle character 
set. 

— RAM Memory Test, convert H's to hex and decimal. 

12 Rabbit Commands 

Note: Rabbit is 2K of machine code at $1800 for 8K PETS 
$3000 or $3800 for 16K PETS, or $7000 or $7800 for 32K 
PETS. (Specify one of the 5 versions.) 

Cassette and Manual - $29.95 (Add $5.00 for foreign) 

Eastern House Software 



3239 Linda Dr. 



Winston-Salem, N. C. 27106 



Finally, MAE - A PET 
DISK-Based MACRO 
ASSEMBLER/TEXT 
EDITOR 



Works with 32K PET 



Works with 2040 Disk, and can drive 2022/2023 
Printer, and/or RS232/20 ma Device thru User Port. 
100% Disk Based, 100% Machine Language. 
Macros, Conditional Assembly, and a new feature we 
developed called Interactive Assembly. 
Coexists with Basic, Auto character repeat. Sorted 
Symbol Table. 

27 Commands, 26 Pseudo Ops, 5 Conditional Ops, 38 
Error Codes. 

Creates relocatable object code on disk. 
Assemble from Memory or Disk. 
String search, search and replace, and inter-line edit. 
Auto line fling, move, copy, delete, renumber. 
Labels up to 31 characters — user specifies length. 
Includes extention to PET monitor (disassemble, 
trace, etc.). Library of PET ROM locations. Relocat- 
ing Loader, plus more. 

Manual, Diskette, U. S. postage - $169.95 

(Requires completion of License Agreement — 
Write for details) 

Eastern House Software 



3239 Linda Drive 



Winston-Salem, N. C. 27106 
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PET Keysort Update 



Two changes are presented to improve the PET Keysort. 



Rev. James Strasma 

120 West King Street 

Decatur, IL 62521 






• 



After further use and testing, I decided 
to make two changes to my program 
KEYSORT as printed in MICRO:23. First, 
I've added to the intelligence of the 
himem setter in lines 550-630 of the 
source listing. Previously, my copy 
wasted about 100 bytes of memory by 
setting himem lower than it needs to be. 
Now it is set just at the start of the sort. 
The new source listing would read: 



.550 



Ida *him + 1;cut himem? 



.560 


seo 


.570 


sbo #h,sart 


.580 


boo sav dont lower himem 


.590 


bne cut ;do lower it 


.600 


Ida *him depend on lo byte 


.605 


sbo #L,sart 


.610 


boo sav ;if already lower 


.615cut 


Ida #L,sart ;out lo, then hi 


.620 


sta "him 


.625 


Ida #h,sart 


.630 


sta 'him + 1 



This is an addition of 3 lines and 5 bytes. 
' 7C50 00 00 



9@ 
90 



7C38 7C ye 
7CS0 54 
7C68 7C 
7C70 85 
7C7S C3 
7CS0 85 
7C8S F0 
7C90 CS 
7C9S 98 
7UR0 R9 
7CR8 F9 
7CE0 El 
7CES El 
7CC0 C5 

7CD0 B0 
7CD8 R5 
7CE0 18 
7CE8 01 



-i a acr 



15 
24 

01 

06 

El 
Rfi 
09 
04 
15 
15 
19 
18 
11 
18 
90 



00 

10 

68 

--icr 

H5 
F0 
fi@ 

H9 



00 R5 
D0 06 

R9 54 
20 98 
2Jj 35 



08 93 
00 El 
80 C5 
C5 01 

03 C3 

04 R5 



fl9 

IS 
85 
F8 
F0 

90 



00 

65 
18 
02 

02 

17 



Q*5 

15 
E8 

£0 



85 15 R5 



9F 
08 



R3 84 



35 

R5 

7D 
16 
80 
15 

00 

•39 
25 
05 
06 
85 
19 
0£ 
06 
02 
19 
El 
7D 



The other change is in the way 
KEYSORT handles nulls. Logically, they 
should have a value below any other 
character. The original KEYSORT treats 
them this way. However, that leads to a 
problem with partially filled Basic arrays. 
All the undefined array elements start out 
as nulls, and end up after a sort at the 
'bottom' of the array, where the signifi- 
cant elements were before. I elected to 
redefine nulls as larger than 'Z', so they 
stay at the 'top' of the array, where they 
were before the sort. The necessary 
changes are made in lines 5180-5220 of 
the source listing. The label 'null' is 
deleted from line 5180. A new label, 
'same' is added to line 5220. Then 4 new 
lines are added after line 5420. These are 
like lines 5180-5200, except that the 
destinations are opposite. The new lines 
read: 



P5 

R5 

C5 
D0 

01 

F0 

R0 
IS 
R5 
R5 
£0 
E0 
85 
15 



.5422nullcpx#1 
.5424 beq two(( 

ESHHmmm 

E9SfHsW£H 

R9lMMfEH 



.5426 bpL one(( 
.5428 bmi same 



00>i8Nui*n 

d-jmmmmm 

cssmmbhsi 

£FffnmMi'ia 

2£amMM 

@2aftsH£MH 

80* 



;put nulls ©top of$s 

;to keep them out 

7CF0 40 57 
7CF8 12 88 
7D00 85 0E 
7D08 85 0D 
7D10 R5 15 
7D13 16 €3 
7E20 0B R5 
7D28 03 4C 
7D30 D0 F7 
7D38 85 1C 
7E40 15 85 
7E48 CS El 
7D50 69 03 
7D53 85 19 
7D60 IS 91 
7D68 38 R5 
7E70 0C E9 
7D78 57 R5 
7D30 IE R5 
7ES8 R5 20 



;of the way of prgm 



:jump 



This change adds 4 lines and 8 bytes to 
the program. Unfortunately it also alters 
many other parts of the object code in 
order to stay just below himem, so you'll 
need to check the enclosed new object 
listing carefully against your copy of the 
former version. 

After these changes are made, the 
system call address for the sort is 
lowered, to sys (31828). The option setting 
addresses are unchanged. If you'd rather 
not make these changes yourself, up- 
dated copies for any loation in memory, 
or for old ROMs are available directly 
from the author for $5.00. Please specify 
the address and ROM set you prefer to 
use. 



El 
R5 
R5 
IS 
00 
13 
9h 
R5 
20 
20 
15 

>-iEr 

OJ 

El 
15 

0B 
00 

0E 
08 
R0 



r. f-.-k i--.-. o = 



R0 06 
15 35 

12 6R 
0E 69 
€3 04 
35 24 
85 @C 
7E R5 
0B 35 
E3 7F 
C3 El 
85 22 
IS R5 

13 91 
S3 El 
E9 01 

0C 
E0 53 
35 1C 
0y 31 



El 15 851 



01 



i •-■ .i o 

13 €3 
00 85 0£ 
85 23 R5* 
R5 12 
R5 0E 
0B C3 
IE R5 



F0PKWRJWa 
01IKSMil 

dcantmmm 

m 00 ElWVeidHil 
15 35 21PWKMWH 

R5 23 iBUwrmitm 

24 €3 00fftW«*»l 
15 88 B1J 

18 91 15 

85 0B R5SW* 

C9 00 wmsmmma 



R-j 67 
23 B3 



m 



15 CS R5« 
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. " 7B90 


21 


91 


15 


03 


R5 


22 


91 


1 5mms/Airm 


- 7F90 


17 


60 


El 


IE 


35 


14 


R3 


SaWiPPPEH 


. '' 7D9S 


R2 


24 


ED 


SB 


i *~ 


43 


B5 


dsmamssm 


•'' 7F98 


85 


17 


60 


R3 


00 


85 


14 




. •' 7DR8 


3D 


DB 


.-' t- 


63 


95 


00 


OR 


10MMMMI 


- 7FR0 


IB 




17 


60 


85 


14 


El 


1 .-IJWIWPifl 


. -' 711*8 


Fl 


60 


38 


R5 


0I( 


E3 


01 


ssimmaam 


•" FFR8 


85 


17 


60 


E0 


01 


F0 


EC 


1 8MBISJPI 


. '- 7DE0 


m 


R5 


0E 


E9 


00 


gg 


0E 


ssmmmm 


-" 7FE0 


El 


38 


DS 


R5 


IB 


os 


IE 


R5lf=>»W»fl 


. - 7DBS 


1C 


R5 


0D 


C ,C T 


IE 


20 


E3 


7F*WWB3a 


•- 7FES 


10 


-.cr 
O-J 


IF 


18 


26 


IB 


26 


! _- WT^W''.'^ff'-'.'M 


. " 7DC8 
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00 


El 


15 


85 


20 


03 


Binmsi 
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IE 


13 


65 


IE 


85 


13 
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15 


35 
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El 
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PET TWO-WAY RS-232 

and PARALLEL 
OUTPUT INTERFACE 




SADI - The microprocessor based serial and parallel 
interface for the Commodore PET. SADI allows you to 
connect your PET to parallel and serial printers, 
CRT's, modems, acoustic couplers, hard copy termi- 
nals and other computers. The serial and parallel 
ports are independent allowing the PET to communi- 
cate with both peripheral devices simultaneously or 
one at a time. In addition, the RS-232 device can com- 
municate with the parallel device. 



Special Features for the PET interface include: 

Conversion to true ASCII both in and out 

Cursor controls and function characters 

specially printed 

Selectable reversal of upper and lower case 

PET IEEE connector for daisy chaining 

Addressable - works with other devices 
Special Features for the serial interface include: 

Baud rate selectable from 75 to 9600 

Half or full duplex 

32 character buffer 

X-ON, X-OFF automatically sent 

Selectable carriage return delay 
Special Features for the parallel interface include: 

Data strobe - either polarity 

Device ready - either polarity 

Centronics compatible 

Complete with power supply, PET IEEE cable, RS-232 
connector, parallel port connector and case. Assembled 
and tested. 

SADIa(110VAC)$295 

SADIe (230VAC) $325 



CONNECTICUT microCOMPUTER, Inc. 

(50 POCONO ROAD 

BROOKFIELD, CONNECTICUT 08904 

TEL (203) 775-9659 TWX: 710-458-0052 

»iM «hd y/c uxtrrio - wag accoukt mum*, iwiiutk* o»rf .«o iim o«oe». 

«D0 13 H* OflOU 'OH SHIPPtM a MANOUMt - fOMIO* OftOCRS A00 10% FO« *)■ POSTAOC. 






Low Cost Graphics 
* e Now Here 
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Tblbor AIM*65 Microeoinpiiter 



Visible Memory Board It's a reality. The Visible 
Memorv and graphic print software from MTU are now- 
available for the Rockwell AIM-65. The Visible Memory 
gives a high resolution 320 wide by 200 high bit mapped 
pixel display matrix. Each dot is individually addressable 
for maximum utilization and speed. Thus characters, image 
shapes, and graphs can all be displayed separately or 
simultaneously if needed — maximum flexibility for you. 

The Visible Memory is just that, an 8K byte RAM board 
that contains 2 access ports to the memory matrix. The 
microprocessor bus uses one port and the display refresh 
circuitry uses the second port. The contents of the memory 
bit-for-bit is precisely what is displayed. If you need 8K of 
RAM for a non-display application, use it! It makes no dif- 
ference to the board what its contents are; program (seen 
in its binary pattern form) or a human recognizable display 
pattern. The display refresh occurs at times when the pro- 
cessor never goes to memory. Therefore there is no snow on 
the display and no wait states for the processor. 

HardeopvToo In addition MTU has engineered a software 
package to drive the AIM-65 printer in new ways. Three 
new forms of printing are possible. QUICKPRINT gives a 
matrix 200 across by 320 up the 2 l A " wide paper. 
QUALITYPRINT gives two prints, each 100 x 320 which 
gives a higher quality (4>/j " wide) printed area when placed 
side by side. TEXTPRINT allows you to print the AIM text 
buffer area of memory as 10 rows of characters printed "up" 
the paper strip. You may specify up 
to 127 characters per row for the 
row length. The QUICK and 
QUALITY print modes are designed 
to give you fast, easy hardcopy of 
the Visible Memory contents. Thus 
you now have a graphic computer 
with hardcopy capability. 



Graphic/Text Software Drivers To allow you to easily 
use this graphic display and print power. MTU has also 
designed tile K-1008-5G software package which gives you 
point plotting, line drawing, character generation and a 
host of other subroutines. Written in assembly language, 
these routines may be executed from HASIC or assembly- 
language — your choice. Text output from BASIC or the 
AIM monitor may also be shown on the Visible Memory- 
display as up to 2'2 lines by 53 characters per line signifi- 
cantly enhacing the use of the AIM-65 as a computer with 
a CRT display. 

Call lis Now Many educators have been waiting for this 
type of price/performance to set up courses. MTU will be 
pleased to quote quantity purchases — call us direct — - 
now. Demand is high and Fall is just around the corner. 
K-1008 Visible Memory $240 

K-1008-5C Graphic/ text software $25 

K-1009-1C AIM Print software $25 

K- 1000-5 AIM-65 Power Supply $65 

K-1005-A AIM-65 Card File $85 

Many others not listed 
Call or write for our catalog listing all our AIM-65 (also 
our PET, KIM-1, and SYM-1) products. 

As of June 1, 1980 place orders at: Micro Technology 
Unlimited, P.O. Box 12106, 2806 Hillsborough Street, 
Raleigh, North Carolina 27605 







Micro Technology Unlimited 

' P.O. Box 4596, 841 Galaxy Way 
Manchester, N.H. 03108 
603-627-1464 
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If you're a businessman who demands ultimate performance from your 
Apple II, then take a look at this outstanding General Ledger Package 
from Small Business Computer Systems (SBCS). 

It features 

• 6 digit account numbers 

• 31 character account name. 

• Ten levels ol subtotals — giving you a mote detailed income statement and balance sheet. 

• Departmentalizing ... up to nine departments. 

• Flexibility — adaptable to any printer and either cash or accural accounting methods. 

• Cash Journal allows a 33 character transaction description and automatically generates the ap- 
propriate offsetting entry. 

• You can print the balance sheet and income statement lor the current month, current quarter, 
or any of the previous three quarters. This year's or last year's totals are also included on the 
income statement. Or a special report that lists the current account balance for selected ac- 
counts. 

• Higher number of entries from an external source — as many as t.000 per session. 

• No limit on entries — giving you the opportunity to make your entries as many times or as 
often as you want. 

• With high speed printer routines and other special features of our conversion, processing per- 
formance does not decrease dramatically at the system limits. 

• Look at these examples of times required to update the chart and print the audit trail. 

With 133 item chart of accounts. 700 postings into 70 regular accounts: less than 20 min. 
With 133 item chart of accounts, 1000 postings into 70 regular accounts: less than 30 min. 
With 210 item chart of accounts, 1000 postings into 125 regular accounts: less than 40 min. 

• Coming early this year — capability to archive up to 2,500 postings. The chart ol accounts will 
also be archived to maintain the opening balance for fhe archive period. 

In the final analysis, your financial statements are what this General Ledg- 
er is all about. And with this General Ledger Package you can format your 
own balance sheet and income statement. As well, department financial 
statements may be formated differently. You have complete freedom to 
place titles and headings where you want them, skip lines or pages be- 
tween accounts and generate subtotals and totals throughout the reports 
— up to ten levels if you need them. 



And coming early in 1980, SBCS will 
present the Accounts Payable/Ac- 
counts Receivable Package you have 
been waiting for. 

Just compare these numbers against 
any package on the market today:* 





5 inch 


8 inch 




disc 


disc 


Vendors or customers 


700 


1,800 


Payable Transactions 


350 


750 


Payable Invoices 


380 


840 


Receivable Transactions 


600 


1,300 


Receivable Invoices 


600 


1,300 



" These are maximum numbers that you can 
put on a disc if you're using the disc only for 
these respective data files. 

We are an authorized converter for 
Osborne/McGraw-Hill, providing you 
with business packages that will do 
everything the Osborne General 
Ledger will do in addition to many 
features we have added. 

Call or write: 

Small Business Computer Systems 

4140 Greenwood 
Lincoln, Nebraska 68504 
(402) 467-1878 



Software 



ire for APPLE® and OSI^ 

by AMERICAN COMPUTER ENTERPRISES 



EXCLUSIVE GAMES for 



APPLE 

ROAD RALLYE 48K $14.95 
A 48K APPLE II game using 5 
hires screens of increasingly 
harder courses that you must try 
to negotiate. Not just another 
game but a real challenge! 
UNCOPY 32K $29. 9 5 

Now there is a way to make your 
disks uncopyable by altering 
APPLE DOS. Track and Sec- 
tor configuration as well as 
changing the catalog track. 
The ULTIMATE TRANSFER 
48K $25. 00 

Easily upload or download 
APPLE programs hundreds or 
thousands of miles away over 
the phone. Easily transfer 
Integer, A-Soft, or Machine 
Language programs using your 
DC Hayes Micromodem.'" 



OSI 

Game Pack 1 

Featuring full use of the OSI 
color and sound with 3 
game programs. 

1) Horse Race - Bet Win. Place 
or Show. Odds and horses are 
continually changing. 

2) Crash! - Force your oppon- 
ent to crash into the wall before 
you do. 

3)Airplane Invaders • Similar 
to the popular arcade game 
using airplanes and bombs. 
C4P Disk - $12.95 

OS»ELLO(8K) $9.95 

Play that ever popular board game with 
yourClP 

OS* I RACEWAY $6.95 

A graphic horse race with changing odds 
Bet to Win. Place or Show 



The ULTIMATE 
MAIL LIST! 

One of the most comprehensive 
mailer programs ever offered for 
OSI. This Program is everything 
you ever wished you had in label 
generating software! Available 
only through CCNJ! 
M-LABEL uses OS65D 



- M-LABEL 



* 



C4-2P&C4MF(24K) 


-$69. 


32 K Version 


- 79. 


C2-8P & C8P 


- 89. 


C8S - C28S - C20EM 


- 89. 


C3 Series 


- 89. 


"Requires 2 Drives 



OSi 



OS • ICE CREAM <8K) $11.95 

An interesting business simulation for 
adults & children. Try to make a profit run- 
ning your own ice cream stand while typical 
business problems occur 
SLOT MACHINE $6.95 

Try your luck at the slot machine It has 
real Atlantic City type payoffs* 

OS *IMON& KALEIDOSCOPE $8.95 

How long can you lost without making a fatal 
mistake' Up to 25 players Included is kalei- 
doscope with unlimited patterns to tickle 
your fancy 

TANK DRIVER $8.95 

Pilot your own tank through an enemy maze 
and reach your own base Each time you 
play the course will change 



OSi 



BOMBER WORD $9.95 

A truly unique game of word guessing. Each 
wrong letter will dispatch a bomber that will 
drop a bomb on a home. As the home bums, 
the inhabitants flee Educational and fun 
too 

MATH FUN $5.95 

A graphic board game that will not only 
entertain, but educate' Selectable skill levels, 
BARREL JUMPER $7.95 

See if you can jump over 15 barrels without 
falling or slipping on the ice A lot harder 
than it looks! 

AIRPLANE INVADER $9.95 

Similar to that arcade game that is sweeping 
the country Shoot down the rows of planes 
before the bomb falls on you 



Order Your MICRO MUSIC BOARD 

for the APPLE II from CCNJ and receive FREE 1 Digisong Pack of our choice. $ 1 79. 



COMPUTER CORNER of NEW JERSEY (201) 835-7080 



439 Route 2 3, Pompton Plains, New Jersey 07444 



Mastercharge and Visa Accepted! 
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Expand KIM - 1 Versatility 
1 i in Systems Applications 



Techniques and programs are presented which permit 
the simple addition of six sense switches or an ASCII 
keyboard to the KIM. 



Ralph Tenny 

P.O. Box 545 

Richardson, TX 75080 



The KIM-1 microcomputer, produced 
by MOS Technology, Commodore and 
Rockwell International, is a single-board 
computer which gained early popularity 
with hobbyists. It also was adopted by 
industry for small controller applica- 
tions. Some of these computers have 
been expanded into fairly large systems, 
in colleges as well as industry. One 
reason for the easy acceptance of the 
KIM-1 was the on-board keypad and six 
digit display. These features, along with 
a slow but extremely reliable audio 
cassette interface for program storage, 
made KIM-1 one of the first microcom- 
puters which did not require an operator 
interface more expensive than itself. 

The on-board keyboard and seven- 
segment display, which permits system 
operation without an teletype of ter- 
minal, is implemented in a way which 
permits addition of both an ASCII exter- 
nal keyboard and sense switches. Fig. 1 
shows the key-pad implementation 
where U24 enables one of three banks of 
seven keys, and U2 (an MCS6530 pro- 
grammable interface device detects a 
key closure in any one of the seven 
switch columns. 



The keyboard encoding scheme works 
as follows: U2 is programmed for output 
on lines PB1-PB4 to dribe U24, a four 
line-to-ten-line decoder which has 
active-low outputs. Note that the least 
significant bit of U2's B port (PBO) is not 
used in the keyboard drive, so values 
written to Port B are incremented by two 
to select the next higher keybank. For 
example, writing 0016 to Port B selects 
Row keys, 0216 enables Row 1 and 0416 
selects Row 2. 

On Port A of U2 (lines PA0-PA6), which 
are programmed as inputs, a closure of 
(for example) key 8 will cause a logic 
zero to be input on PA5 whenever key 
Row 1 is active (low). KIM's operating 
system software then decodes Row 
1/PA5 as key 8 and returns the value 
0816 in the accumulator. 

A fourth keybank (Row 3) is also im- 
plemented by this matrix, but the stan- 
dard KIM-1 has only the TTY/KYBD 
switch installed on this row. FIG. 1 
shows six additional switches in- 
plemented on Row 3; with proper pro- 
gramming, these can be used as sense 
switches or imput lines for address vec- 



tors in an expanded interrupt scheme. 
Listing 1 gives an example of the pro- 
gramming required to detect activity on 
Row 3 inputs. 

The programming strategy requirea tor 
any such inputs is to enable PAO-PA6 
lines for input and sequentially activate 
the driving lines (outputs of U24 in this 
case) to their on (low) state. The program 
then reads all input lines, masks and in- 
verts the data and returns to the calling 
program which tests the accumulator for 
any "one" bits. It is then the 
programmer's responsibility to repeat the 
scan periodically and test to see if the 
same data is present (a noise spike would 
be gone on a second scan) or has chang- 
ed after some period of time. This testing 
allows for switch bounce— multiple 
closures of the contacts — a 
characteristic of all switches. Very good 
switches will bounce for a minimum of 
one or two milliseconds, while worn or 
cheap switches may bounce for up to 25 
milliseconds. On the other hand, any 
operator who is trying to make a very 
short switch closure will find it difficult to 
release a switch earlier than 50 
milliseconds after closure. Consequently, 
reading keys with software is a fine art! 



> 



A9 00 
8D 41 17 
A9 3F 
8D 43 17 
A9 06 
8D 42 17 
AD 40 17 
29 7E 
49 7E 
A2 00 
8E 42 17 
60 



L ISTING I 

LDA #$00 SET PADD (KEY INPUT LINES) 

STA PADD FOR INPUT 

LDA #$3F SET PBDD (ROW DEFINITION) 

STA PBDD FOR OUTPUT 

LDA #$06 ENABLE KEYBOARD 

STA PBD ON ROW 3 

LDA PAD READ SENSE SWITCHES 

AND #$7E MASK OFF TTY/KYBD SWITCH 

EOR #$7E INVERT SWITCH DATA 

LDA #$00 DISABLE 

STX SBD KEYBOARD 

RTS RETURN TO CALLING PROGRAM 
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Any keyboard with ASCII outputs is 
likely to have both a debounced output 
and a strobe which becomes active when 
there is a key pressed and the data has 
been debounced. Typically, the key data 
is active high (positive logic), but the 
strobe can be either active high or active 
low. The ASCII keyboard input described 
here does not use the strobe; instead, the 
key matrix is scanned in the same man- 
ner as is the normal KIM keypad. Fig. 2 
shows the necessary connections— a 
pull-down transistor for each output bit of 



17 



the keyboard. Any logic "one" data from 
the keyboard will input a low on the same 
lines as the KIM keypad. Note that some 
keyboards output only six bits, so the 
strobe can be implemented on Column G. 

Listing 2 shows a "bare bones" scan 
program which will return to the calling 
program as did Listing 1. The basic 
scheme here is to initialize the ac- 
cumulator to FF-ie and get the input data 
by a logic AND with the input port. The 
data is then inverted (Exclusive OR) and 

LISTING II 



tested for any logic one bits. Note that 
the calling program could also per- 
manently set the port for input and 
somewhat abbreviate the program seg- 
ment shown. If the strobe is implemented 
on Column G as mentioned above, the 
6502 BIT instruction followed by a test of 
the overflow status bit (BVC or BVS) will 
identify strobe activity. Note that the on- 
board keypad must not be active when 
the ASCII keyboard is being used, and 
that the normal KIM keypad scan 
routines will not properly interpret the 
ASCII input. 



w< 



A9 


80 
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A9 


FF 


2D 


40 


49 


7F 


F0 


02 


A9 


80 


60 
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OUT 



LDA #$80 ENABLE KEYBOARD 

STA PADD INPUT LINES 

LDA #$FF INITIALIZE ACCUMULATOR 

AND SAD INPUT POSSIBLE KEYBOARD BITS 

EOR #$7F INVERT ANY BITS PRESENT 

BEQ OUT TEST FOR DATA PRESENT 

LDA #?80 SET FLAG FOR NO INPUT 

RTS RETURN TO CALLING PROGRAM 
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Figure 7.-KIM-1 Keyboard allows six sense switches to be Bit — "VW 
added. 
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Figure 2: Simple interface allows addition of ASCII 
keyboard to basic KIM-1. ^j 
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KIMSI 
FLOPPY 
DISKS— 

PERRY PERIPHERALS HAS 

THE HDE MINIFLOPPY TO KIMSI 

ADAPTER 



* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 



* MINIFLOPPY S-100 ADAPTER: $15+ 1.50 p&h * 

* ($20. as of June 1, 1980; * 

* • FODS and TED Diskette * 

* • FODS and TED User Manuals * 
*• Complete Construction Information 



(N.Y. State residents, add 7% Sales Tax) 



* (Not a kit; no parts supplied) 
♦OPTIONS: 

*• FODS Bootstrap in EPROM (1st Qtr'80) 
*• HDE Assembler (ASM) $75 

♦ • HDE Text Output Processor (TOPS) $1 35 
* 
* 

Place your order with: 
PERRY PERIPHERALS 

P.O. Box 924 

Miller Place, N.Y. 11764 

(516)744-6462 

Your "Long Island' HDE Distributor 

"•a********************** 
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Presenting the Olher Side of ihe Apple II ' 
INDEXED FILES 

ISAM DS is an integrated set of routines for the creation and manipulation 
of indexed files. ISAM DS provides capabilities comparable to those on 
large mainframes. You can rapidly retrieve records by key value or partial key 
value I retrieves any record in a 200 record file, 60 char/ record, in less than 3 
seconds compared to a maximum of 38 seconds for a DOS sequential file). 
Files never have to be reorganized. Duplicate key values may be used. 
Records may also be retrieved in sequence. IS AMOS routines are easily in- 
tegrated into Applesoft programs - they use less than 3K RAM plus an in- 
dex table. 

Requires: Disk, Applesoft (32K ROM or 48K RAMI 
$50 

STRUCTURED BASIC 

PBASIC-DS is a sophisticated preprocessor for structured BASIC. Now 
you can gain the power of PASCAL-like logic structures at a fraction of the 
cost. Use all regular BASIC statements plus 14 commands and 11 new 
statements/structures (WHILE, UNTIL, CASE. etc. I. PBASIC-DS can be 
used to develop INTEGER or APPLESOFT programs. It is a great way to 
learn and use structured logic concepts. 

Requires: Disk. Applesoft (32K ROM or48K RAMI 

S35 

(Texas residents add 5% lax) 

Decision Systems 

P.O. Box 13006 
Oenton, TX 76203 



'Apple II is a registered trademark of the Apple Computer Co. 



KIM/SYM/AIM-65-32K EXPANDABLE RAM 

DYNAMIC RAM WITH ON BOARD TRANSPARANT REFRESH 
THAT IS COMPATIBLE WITH KIM/ SYM/AIM-65 
AND OTHER 6502 BASED MICROCOMPUTERS. 






.cecum Ftl/ r WITH32KRAM J4I9.00 

SrcTcr , < WITH 16K RAM J349.00 

TESItU j_ W | T H0UT RAM CHIPS K79.00 

HARD TO GET PARTS ONLY (NO RAM CHIPS! . J109.00 
BARE BOARD AND MANUAL J49.00 



• PLUG COMPATIBLE WITH KIM/SYM/AIM-65. 
MAY BE C0NNECTEDT0PETUS1NG ADAPTOR 
CABLE SS44-E BUS EOGE CONNECTOR. 

• USES -5V ONLY (SUPPLIED FROM HOST 
COMPUTER BUS). 4 WATTS MAXIMUM. 

. BOARD ADDRESSABLE IN 4K BYTE BLOCKS 
WHICH CAN BE INDEPENDENTLY PLACED ON 
4K BYTE BOUNDARIES ANYWHERE IN A 64K 
8YTE ADDRESS SPACE. 

. ASSEMBLED AND TESTE0 BOARDS ARE 
GUARANTEED FOR ONE YEAR. AND 
PURCHASE PRICE IS FULLY REFUNDABLE IF 
BOARD IS RETURNED UNDAMAGED WITHIN 
14 DAYS 

• BUS BUFFERED WITH US TTL LOAD " 

• 200NSEC4116RAMS 

• FULL DOCUMENTATION 



I PET INTERFACE KIT $49.00 

CONNECTS THE ABOVE 32K EXPANDABLE RAM TO A 4K OR 8K PET. 
CONTAINS EXPANSION INTERFACE CABLE. BOARO STANDOFFS. 
P0WEB SUPPLY MODIFICATION KIT AND COMPLETE INSTRUCTIONS. 



J 



6502. 64K BYTE RAM AND CONTROLLER SET 
MAKE 64K BYTE MEMORY FOR YOUR 6800 OR 
6502 THIS CHIP SET INCLUOES: 
. 32M5K4116-3 I6KX1.200NSEC RAMS 
• 1MC3480 MEMORY CONTROLLER 
. I MC3242A MEMORY ADDRESS 

MULTIPLEXER AND COUNTER 
. DATA ANO APPLICATION SHEETS PARTS 

TESTED AND GUARANTEED. 
$295.00 PER SET 



I6K XI DYNAMIC HAM 
THE MK4116-3 IS A 16.384 BIT HIGH SPEED 
NM0S DYNAMIC RAM THEY ARE EQUIVALENT 
TO THE M0STEK. TEXAS INSTRUMENTS. OR 
M0T0R0LA4116-3. 
. 200 NSEC ACCESS TIME. 375 NSEC CYCLE 

TIME. 
. 16 PIN TTL COMPATIBLE 
• BURNED IN ANO FULLY TESTED 
. PARTS REPLACEMENT GUARANTEED FOR 

ONE YEAR. 

$8.50 EACH IN QUANTITIES OF 8 



COmPUTER DEVICES 



1230 uj.couins Aue. 

ORflflGE. Cfi 92668 
(714)633-7280 



CALIF P.ESIOENTS PLEASE AOD 6** SALES TAX 
MASTERCHABGE & VISA ACCEPTEO PLEASE 
ALLOW 14 OAYS FOB CHECKS TO CLEAR BANK 
PHONE OP.DEPS WELCOME 



ALL ASSEMBLEO BOARDS AND MEM- 
ORY CHIPS CARRY A FULL ONE YEAR 
REPLACEMENT WARANTY. 



MICRO Club Circuit 



MICRO continues its soon to be mon- 
thly feature on 6502-related clubs. We are 
continuing to publish the names, loca- 
tions, and activities of groups that could 
be of interest to our readers. 

If you are involved in such a club have 
your representative register your group 
with us. In return for this registration we 
will send a free one year subscription of 
MICRO to your club's library. Include in- 
formation regarding the club's name, 
location, algorithm, publications, pur- 
pose, officers, number of members, con- 
tact person, etc. Your club will then 
automatically appear in any club up- 
dates. If you are already registered please 
be sure to keep us current on your club's 
activities. 

We would like this feature to be as 
helpful to our readers as possible. We 
welcome any information that will be of 
interest to other clubs: ie. what your club 
does, how it got started, what is publish- 
ed, your meeting format, purpose, etc. 

We are publishing a complete list as of 
March. Please keep the updates coming! 
Start increasing your membership and 
give your group new exposure by telling 
others about yourselves. 

If any of the following information is in 
error or outdated, please notify us.Ad- 
dress any questions or information to: 

MICRO CLUB CIRCUIT 

P.O. Box 6502 

Chelmsford, MA 01824 

OSI User's Group 

Meets at Aristocraft on the first Thursday 
of the month (7-9:00 p.m.): 

314 5th Avenue 

New York, New York. 
David Gillette, President. "Mutual aid and 
sharing of information." 

The Big Apple User's Group 
Meets on the last Tuesday of each 
month, at: 

55-A Locust Avenue 



New RochelleNew York 
Tony Cerreta, President. "Exchange of 
ideas, growth in the field, production of 
hardware and software." 

Apple Pi Computer User's Group 

Meets first Thursday of each month at: 

Colorado School of Mines 

Cecil H. Green Bldg 

Room 280 

Boulder, CO. 
Scott Knaster, President. "Spread infor- 
mation, use of documentation library and 
a software library for research and 
trading." 

Apple User's Group 

Meets on the third Thursday of each 
month (7:30 p.m.) at: 

Computerland of Walnut Creek 
1815 Ygnacio Valley Road 
Walnut Creek, CA. 
Hank Couden, President. "Foster 
knowledge and use of the Apple Com- 
puter." 

Original Apple Corps 

Meets second Sunday of the month (12:00 
Noon) at: 

Cal State University at Long 

Beach 

Lecture Hall 151 
Contact: 

Kip J. Reiner, 

19041-2 Hamlin Street 

Reseda, CA 91335 
"Expand the knowledge of Apple Com- 
puters. Software and Hardware." 

Greater Lafayette Apple User's Group 

Meets on the second Wednesday of each 
month (7:00 p.m.) at: 

Digital Technology 

10 North Third 

Layfayette, IN. 47901 
Jon W. Backstrom, President. "Library of 
public domain software. Exchange pro- 
gram. Want to educate members on suc- 
cessful programming skills. Workshops." 

Salem (Oregon) Area Computer Club 

Meets on the first Monday of each month. 



On odd numbered months, meetings are 
held at: 

McKinley Community School 

461 McGilchrist Street SE 

Salem, OR. 

and on even numbered months at: 

The Computer Pathways 

Unlimited Retail Store 

831 Lancaster Drive NE 

South End-Lancaster Mall 

Salem, OR. 
Contact: 

DougWalker 

4554 Jan Ree Drive NE 

Salem, OR 97303 
"Each meeting features a presentation by 
a club member or an invited guest, follow- 
ed by a 'bull session'." 

The Apple Cart 

A special interest group of American 
Mensa. For more information contact: 

C. Brandon Gresham, Jr. 

23 Van Buren Street 

Dayton. OH 45402 
"Hardware and software information. 
Software exchange. Promote the creation 
of well written and well documented soft- 
ware." 

Apple Sac 

Meets first Tuesday and third Wednesday 
of the month (7:00 p.m.) at: 

Woodbridge School 

5761 Brett Drive 

North Highlands, CA 
For further information contact: 

Bill Norris, President 

8074 Ruthwood Way 

Orangevale, CA 95662 
"To provide members with information, 
discounts at group rates, a place to ex- 
change programs, ideas, techniques, 
hardware modifications and to feature 
guest speakers." 

Ohio Scientific Users NW 

Meets second Friday of each month at: 

Data Systems Plaza 

975 SE Sandy Blvd 

Portland, OR 97214 
Meetings are at 7:30 p.m. 
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The Santa Barbara Apple User's Group 
Meets at: 

2031 De La Vina 

Santa Barbara, CA 93105 

Las Cruces Computer Club 

Meets the first Thursday of the month 
(7:30 p.m.) at: 

SouthWest Computer Center 

Suite 7 

121 Wyatt Drive 

Las Cruces, N.M. 88001 
John Martellaro, President. Contact him 

at: 

2929 Los Amigos, Apt.B 

Las Cruces, New Mexico 88001 

AppleSiders of Cincinnati 

Meets the second Tuesday of the month 
(7:30 p.m.) at: 

The University of Cincinnati 

Med. Science Bldg. 
Contact: 

John Anderson 

5707 Chesapeake Way 

Fairfield, OH 45014 

Denmark 6502 Club 

A country wide 6502 microprocessor club 
is being formed. Please contact for fur- 
ther information: 

E.Skovgaard 

Nordlundsvej 10 

DK-2650 Hvidoure 

Denmark 
"Systems are reviewed and demon- 
strated. Developing a software library." 

Carolina Apple Core 

Meets third Tuesday (7:30 p.m.) of the 
month for general meeting. Other 
meetings are held on specific topics. 
Contact Joe Budge, President at: 

P.O.Box 31424 

Raleigh, NC 27622 
"General support of the Apple User." 

North London Hobby Computer Club 

For more information contact: 
Stephanie Bromley 
The Polytechnic of North London 
Holloway, London N7 8D8 

Computer Club in Belgium 

DeVlaamse Minicomputerclub 
Lambrechtshoekenlaan 171b6 
2060 Merksem, Belgium 

Apple Group • New Jersey 

Meets the fourth Friday of every month 
(7:00 p.m.) at: 

Union County Tech. Institute 

1776 Raritan Road 

Scotch Plains, N.J. 

PACS PET User Group 

Meets the third Saturday (11:00 

a.m.) every month at: 

Science Building 

LaSalle College 

20th and Onley Avenue 

Philadelphia, PA 19191 



Washington Apple Pi 

Meets the fourth Saturday (9:30 a.m.) 
every month at: 

George Washington University 

Rm. 206, Tompkins Hall 

23rd and H streets NW 

Washington, DC 
You may write to this club at: 

Washington Apple Pi 

P.O.Box 34511 

Washington, DC 20034 
"Publishes a monthly newsletter." 

South Carolina Apple 

Meets second Tuesday of the month (7:30 
p.m.) at: 

The Byte Shop 

1920 Blossom Street 

Columbia, SC 
You may address your inquiries to: 

P.O.Box 70278 

Charleston Heights, SC 29405 



WAKE- 

(Washington Area Kim Enthusiasts) 

Meets the third Wednesday (7:30 p.m.) of 

every month at: 

McGraw-Hill Continuing Educa- 
tion Center in Washington DC. 

Contact Ted Beach at 

5112 Williamsburg Boulevard 
Arlington, VA 22207 

for further information. 

Miami Apple User's Group 

Contact David Hall, Secretary at: 
2300 NW 135th Street 
Miami, FL 33167 

Sun Coast Apple Tree 

Meets the first and third Thursday of the 
month (7:00 p,m,) at: 

The Computer Store 

21 Clearwater Mall 

Clearwater, FL 33516 

Central Ohio Apple Computer Hobbyists 

(COACH) Meets the third Saturday of 
each month (1:00 - 5:00). Contact: 

Tom Mimlitch 

1547 Cunard Road 

Columbus, Ohio 43227 

Apple Dayton 

Meets the second Wednesday of odd 
numbered months and the second Thurs- 
day of even numbered months (7:30 p.m.) 

at: 

Computer Solutions 
Contact: Robert W. Rennard at 

2281 Cobble Stone Court 

Dayton, OH 45431 

Madison Pet User's Club 

Meets monthly at: 
Washington Square Building 
1400 East Washington Avenue 
Madison, Wl 53913 
Contact: Ben A. Stewart 
501 Willow 
West Baraboo, Wl 53913 



Micro and Personal Computer Club of St. 
Louis 

Meets monthly at: 

Futureworld, Inc. 

12304 Manchester Road 

St. Louis, MO 63131 
Contact: Mr. Kunihiro Tanaka 

Tulsa Computer Society 

Meets the last Tuesday of each month 
(7:30 p.m.) at: 

Tulso Vo-Tech School 

Seminar Center 

3420 S. Memorial Drive 

Tulsa, OK 
This society also has an Apple User 
Group. For more information please write 
to: 

The Tulsa Computer Society 

P.O.Box 1133 

Tulsa, OK 74101 

The Apple Corps 

Meets the second Saturday of 
each month (2-5:00 p.m.) at: 
Greenhill School 
14255 Midway Road 
Dallas, TX 

Appleseed 

Meets monthly at: 

The Computer Shop 

6812 San Pedro 

San Antonio, TX 78216 

Apples Brit.Columbia Computer Society 

Meets the first Wednesday of each 
month. Contact: 

Gary B. Litte 

101-2044 West Third Avenue 

Vancouver, British Columbia 

Canada V6J 1L5 

Honolulu Apple User's Society 

Meets the first Monday of each month at 
the Computerland Store in Honolulu. 
Contact: 

Bill Mark 

98-1451-A Kaahumanu Street 

Aiea, Hawaii 96701 

Has anyone heard from the following 
clubs? Are they still active? Any current 
information would be appreciated! 

The Microcomputer Investor's Assoc. 
The New England Apple Tree 
Apple User Group of Europe 

Applelist 

Meets the second Wednesday of the 
month (7:30 p.m.) at: 

Computerland 

Skiff Street 

Hamden, Conn. 
Contact: 

Marc B. Goldfarb 

55 Pardee Place 

New Haven, Conn. 06515 
"Promote greater literacy on Apple II, 
Publish Newslad (ASAP) and aid new 
users." 
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THREE GOOD REASONS YOU SHOULD READ 

\*\JuVWr %J I IE ■ The Journal for Progressive Computing." 



ISSUE 1, FALL, 1979 

Selecting and Developing Small Business Systems — 
Potential Problems & Pitfalls . . . Mike Sawyer, 4 

Sorting Sorts: A Programming Notebook, 

Rick & Belinda Hulon, 7 

Len Lindsay Reviews Three Word Processors — 

An Overview , 13 

Commodore Business Machines 14 

Connecticut Microcomputer 17 

Programma International 19 

Microcomputers for Nuclear Instrumentation, 

J.S. Byrd. 24 

Tokens Aren't Just For Subways: 

Microsoft Basic Harvey Herman, 29 

Universal 6502 Memory Test 

PET, Apple, Sym and Others . . . Carl Moser, 32 

Microcomputers in Education Pierre Barrette, 33 

Flying With PET Pilot: Kids and 

Microcomputers At Peninsula School. 
Katie and David Thornburg. 40 

Teachers. Computers, and The Classroom, 

C.J Can and Everett Carr, 42 

Atari Computers: The Ultimate Teaching 

Machines? John Victor, 62 

The Evolution Of A Magazine l~en Lindsay, 65 

Pet In Transition — ROM Upgrade Map, 

Jim Butterjield, 68 

A Commodore Perspective Bob Crowe/I, 71 

Retrofitting ROMs Larry Issacs, 76 

PETScreen Print Routine . . . David Malmberg, 78 

TRACK For The PET Brett Butler, 84 

32K Programs Arrive Len Lindsay. 86 

Using Direct Access Files With The Commodore 

2040 Dual Drive Disk Chuck Stuart. 93 

Mastering The Ohio Scientific Challenger IP, 

Keith Russet/ & Dave Schultz, 97 



ONE GOOD 
REASON TO READ 

compute II. 

The Single-Board COMPUTE.™ 
ISSUE 1, APRIL/MAY, 1980 

The Editor's Noics Robert Lock, 2 

The Single-Board 6502 Eric Rehnke. 3 

Nuis & Volis Gene Zumchak. 9 

RS-232 Communications, Fan I .Michael E. Day. lb 

An Upgrade Tor KIM Microchess 1-0 

GaroldR. Stone, 19 

Program Transfers (Pc-i lo Kim) 

../.A Dills &H B. Herman. 25 

Designing an IF.KK-488 Receiver Wiih 

The SYM Larry Isaacs, 27 

Fun Wiih ihc 1 802 Larry Sandlin. 34 

Improved Pulse Counting Software for 

llic 6522 VIA Marvin L. De/ong. 36 

Printing A Symbol Tabic tor ihc AIM-65 

Assembler . Richard /•'. O/iiv, 40 

Maul Copy Graphics lor the Kim .... Keith Sproul, 43 
24 Hour Clock forSYM-l Basic . .AM Mackay. 46 
Screen Clear Routines lor the OSI 

C1P Charles L. Stanford, 49 

Machine Language Tapes for OSI 

Challengers Darnel Schwartz, 52 

Songs in the Key of KIM George W Hawktm, 54 I 



COMPUTE. 

and 
compute II. 



ISSUE 2, JANUARY/FEBRUARY, 1980 

The Editor's Notes Robert Lock, 1-3 

The Consumer Computer Len Lindsay, 

Interview with Dr. Chip COMPUTE Staff, 7 

Sorting Sorts. Part 2 Belinda and Rick Hulon. 1 1 

Memory Partition of Basic Workspace 

Harvey B. Herman, 1 8 

Home Accounting, Plus An Easier Method of 

Savins Data Robert W. Baker. 2 

Word Processing, A User Manual of Reviews - 

Part 2 Len Lindsay, 2 

Boole Review: 6502 Assembly Language 

Programming Jim Bullerfield. 36 

Machine Language Versus Basic: Prime Number 

Gcneration/AIM 65 Marvin L. De/ong, 39 

Basic Memory Map (Page 0): Aim. Kim. Sym. 

PET. Apple Jim Butterjield, 41 

RambUV Roy O'Brien, 42 

The Learning Lab Marlene Pratto, 43 

Micros and the Handicapped 

The Delmarva Computer Club. 44 

The Apple Gazette 65 

A Printer for the Apple: The Heath HI4 

Don Earnhardt. 66 

The Atari Gazette 70 

Comparison of Microsoft PET Basic with 

Atari Basic Jorelta Klep/er, 70 

The Ouch in Atari Basic 

Glen Fisher and Ron Jeffries. 75 

Atari Basic. Part 2 John Victor. 76 

The Pet Gazette 78 

Computer Programs and Your Ethics 

Robert Lock. 7 

The Programmer's Corner 

Robert Lock and Larry Isaacs. 80 

Lower Case Descention on the Commodore 

2022 Primer W.M Banker. 81 

Saving Memory in Large Programs .Mike Rtchter. 82 

The Deadly Linefeed Jim Butterjield, 82 

Yes. Nova Scotia, There is a Kour ROM PET 

Robert Lock, 82 

Apparent Malfunction o'l the<Key 

Jim Bullerfield. 8 

Using Direct Access Eiles with the Commodore 

2040 Disk Drive Chuck Stuart. 8 

Null Return Simulation for PET Users 

. . . .Matsurrmto. Wemshank and Davis. 90 
A Eew Entry Points. Original/Upgrade ROM 

Jim Bullerfield. 9 

Plotting with the CUM 2022 Printer 

Len Lindsay. 93 

Inside the 2040 Disk Drive Jim Butterjield. 94 

PET Programs on Tape Exchange ... Gene Beats, 96 

Review: Batter Up Carl Slrabel. 98 

Review; Plexivuc Art llunkms. 99 

Review: Texlcasl /or Dills. 100 

The SBC Gazette 102 

The Single-Board 6502 Em Rehnke. 102 

A Sym- 1 Message S. roller A.M. MacKay. 108 

Adapting Basic Programs from other Machines 

to tin- OSI Charles L. Stanford. 110 

Proofread Tor your KIM Ralph Kelley. 112 

Notes on die Pulse-Counting Mode of 

I he 1)522. Marvin 1. De/ong. I 14 

Tokens in OSI Basic Barry I.. Beat. I lb 

The 6502 
Resources 



ISSUE 3, MARCH/APRIL, 1980 

The Editor's Notes Robert C. Lock, 3 

Computers and Society 

David D. Thornburg and Betty J. Burr, 7 

Dr. Chip 8 

Preview of Commodore's New Disk Basic 4.0 

Chuck Stuart, 10 

Enhancing Commodore's Word Pro II 

Larry Isaacs, 1 5 

File Conversions on the Commodore 2040 

Drive Hal Wadleigh, 18 

Program listings for COMPUTE 20 

Using the GET Statement on the PET 

AlfredJ. Bruey, 23 

Proper Diskette Handling Chuck Stuart, 24 

Machine Language .Jim Butterjield, 26 

Review: Synertek Systems KTM-2 

Edward D. James, 29 

Utinscl: Enabling Utilities Larry Isaacs, 34 

Identify Your Atari Colors Len Lindsay, 39 

Manual Alphabet Tutorial on a PET 

Susan Semancik, 4 1 

The Learning Lab Marlene Pratto, 51 

Review: The Prestodigitizer .... Laura M Benson, 56 

A Micro for the Teacher Thorwald Esbensen, 58 

Light Pen Selection on PET/CBM Screen 

David R. Heise, 60 

The Consumer Computer Len Lindsay, 63 

The Apple Gazette 68 

Naming Apple Cassette Files D.P Kemp, 68 

On Apple II to Heathkit H-14 Mike Wiplich, 69 

New Product Feature: 

80 Columns and Upper/Lower Case Letters for 

Apple II MichaelS. Tomczyk, 70 

Apple Software Note Eric Rehnke, 72 

The Atari Gazette 74 

Notes on Atari Robert Lock, 74 

Star Raiders Defend the Galaxy . . .Jorelta Klep/er, 74 
Star Raiders: The Wizard Behind the 

Game Michael S. Tomczyk, 75 

Review: Atari Basketball Cartridge 

Len Lindsay, 76 

Atari Program Saving Len Lindsay, 76 

Review of Atari's 810 Disk System 

Ron Jeffries and Glen Fisher, 78 

The PET Gazette 81 

Oops! W.M. Bunker, 81 

Null Return Revisited Earl H Wuchter, 81 

Cheep Prim. PART 1 C.A- Mc Carthy, 82 

Direct Screen Input Len Lindsay, 88 

No CB2 Sound? Larry Isaacs, 88 

A Versatile Serial Printer Interface for the 

PET . . . Harvey B. Herman and Charles B. Pate, 90 

Rambling Roy O'Brien, 92 

Review: MAE, A PET Disk-based Macro 

Assembler James Strasma, 93 

Review: The PET Rabbit James Strasma, 94 

PET Programs on Tape Exchange .... Gene Beals, 95 
Memo to Machine Language Programmers 

Jim Butterjield, 96 

The SBC Gazette 98 

The Single Board 6502 Eric Rehnke, 99 

More about compute II Robert Lock. 104 

Nuts and Volts Gene Zumchak. 105 

Read PET Tapes with your AIM 

Mark Reardon and Eru Rehnke, 1 1 

Review: KIM EX- 1 Harvey Herman, 1 13 

Fast Tape Read/Write Programs for your 

OSI .Edward H. Carlson. 115 

Applications Review: Logic Analyzer for KIM 

Roy Flacco, 1 18 

Try Pseudo Code Eric Rehnke, 120 
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Issue 4. COMPUTE covers Pet. Apple and Atari. The Single Board Computer Gazette moves 
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S12.00 U.S. Subscribe to both through June 30, 19BO for $15.00, U.S.; S18.00 U.S. in 
CANADA COMPUTE. P.O. Box 5119, Greensboro, N.C. 27403, (919) 272-4867 Publications 
of Small System Services, Inc.. 900-902 Spring Garden Street. Greensboro, N.C. 274Q3. 
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The MICRO Software Catalog: XX 



Mike Rowe 

Box 6502 

Chelmsford, MA 01824 



Name: 


The Designer System 


System: 


Apple li or Apple li + 


Memory: 


48K 


Language: 


ROM APPLESOFT 


Hardware: 


Apple II w/OISK II 



Description: The Designer is a HIRES 
graphics macro-operating system that 
provides the user with line and curve 
creation with game paddles (or Joysticks) 
and single keystroke ease. Lines, circles, 
arcs, ellipses, rectangles, areas, etc. may 
be quickly drawn, modified, and saved to 
Disk as completed or unfinished draw- 
ings. Both HIRES pages are used to pro- 
vide 2 position animations. Typical uses 
are computer art, graphic game setups, 
visual presentations, and showing off. 
Sometimes called "the poor man's 
graphics tablet" this program does your 
complex hplotting for you. ERROR-FREE- 
GUARANTEE 

Price: $24.95 

Includes: Disk with DEMOS and 

Manual, guarantee 

Author: Jeff Johnson, Apple Jack 

Available: Your dealer or Apple Jack 

12 Monterey Drive 
Cherry Valley, MA 01611 

Name: ACTS 

System: Apple II 

Memory: 32K RAM with ROM Sp- 

plesoft 
Language: Applesoft and Machine 

Language 
Hardware: Apple II, Disk II, D C 

Hayes Micromodem. 

Description: The Apple Communication 
Transfer System (ACTS) and an Apple 
(equipped with a disk drive, ROM Ap- 
plesoft, and a C C Hayes micromodem) 
will transfer over the telephone Apple pro- 
grams in all three languages. Exchange 
programs with others without leaving 
your home. No program modifications, 
self adapting and easy to use. 



Automaticlly stores the transfered pro- 
gram on the receiving Apple's disk, ready 
for use. The entire ACTS system, on a 
disketter with complete documentation, 
retails for only $14.50. All proceeds deriv- 
ed from the sale of ACTS will go toward 
the procurment o( micro hardware for the 
Northeast Ohio Apple Bulletin Board 
System. 



Copies: 

Price: 

Includes: 

Author: 

Available: 



Name: 
System: 
Memory: 
Language: 

Hardware: 



30 plus 
$14.50 on disk 

System diskette and full 
documentation 
Northeast Ohio Bulletine 
Board System 

The NEO/ABBS 
P.O. Box 4731 
Clevelnd, Ohio 44126 

Road Race 

Apple II 

16K min 

Integer Basic and 

Machine Language 

Game paddles or 

joysticks 



Description: Real-time simulation of 
Grand Prix Road Racing. Two players 
race around a 2.25 mile course, or one 
player races against a computer driven 
car. HIRES display shows through- 
windshield view of race course. 

Price: Cassette $15.00, disk $20 

Author: Stan Erwin 

Available: Stan Erwin 

5410 W. 20th Street 
Indianapolis, IN 
46224 

Name: Space Shuttle Landing 

Simulator 
System: Apple II 

Memory: 48K 

Language: Machine language and 

Applesoft 



Description: Slightly improved version of 
program advertised in November 1979 of 
MICRO. Give system config. 

Copies: 250 plus 

Price: Applesoft RAM $15.00 on 

cassette, Applesoft ROM 
$17.00 on casette, 
Diskette version $21.00. 
State which. 

Author: John Martellaro 

Available: Harvey's Space Ship 

Repair 

P.O.Box 3478 Univ. Park 
Las Cruces, NM 88003 

Name: Restaurant Evaluation 

System: Apple II 

Memory: 16K 

Language: Applesoft II 

Hardware: Disk II, Printer (both op- 

tional) 

Description: Evaluates potential 
restaurant/night club sites and thereby 
reduces the margin of risk involved in pur- 
chasing a new or existing business. All 
the necessary percentages and formulas 
are programmmed to evaluate whether a 
potential site will be profitable or not. The 
program is also structured for use by pre- 
sent restaurateurs to evaluate whether or 
not their present business is operating at 
cost and profit effeciency. Calculates 
montly gross, computes monthly loan 
rates (or mortgage), and reports weekly, 
monthly and annual net profit/loss in 
dollar amounts and percentages. 



Copies: 
Price: 



Includes: 

Author: 
Available: 



25 + 

$19.95 Diskette plus 

$1.95 P&H First Class 

Mail, Check or Money 

Order. 

Diskette and full 

documentation 

M. Goldstein 

Mind Machine, Inc. 

31 Woodhollow Lane 

Huntington, N.Y. 11743 



May, 1980 



MICRO — The 6502 Journal 



24:69 



Name: 


Trace/Debug-Monext 


System: 


SYM-1 


Memory: 


2K (for cassette version) 


Language: 


Assembler 


Hardware: 


Standard SYM (w/CRT) 



Description: This program adds 15 com- 
mands to SYM"s monitor including: 
Trace, Disassemble, Relocate, Find, 
ASCII dump, Stack dump, etc. The "T" 
command sets up its own operating en- 
vironment supporting commands such 
as, Go, Skip, Continue, Single Step, 
Memory/Register examine/modify, ect. As 
SYM executes each instruction of the 
user program, an NMI is generated. IF the 
address of the instruction is "valid" — 
neither in SYM's monitor not the exten- 
sion — and if it is not is a "skip" range, a 
disassembly/register listing is printed. 
This program as a whole is clean and 
operates transparently under SYM's OS. 
SASE for complete specs and examples. 



Copies: 
Price: 



Author: 
Available: 



Name: 

System: 

Memory: 

Language: 

Hardware: 



Just released 

Object listing 

$14.95 

Cassette 

$15.95 ,7/53800 or specify 

EPROM (2716) 

$49.95 @$F000 or specify 

Commented Source 

$9.95 

Jeff Holtzman 

Jeff Holtzman 

6820 Delmar-203 

St. Louis, MO 63130 



LEM LANDER 
Apple II 
32K 

Applesoft 
Disk II 



Description: Lem Lander is a real-time 
version of the popular lunar lander game. 
This disk-based game includes nine land- 
scapes to try your hand at landing on. 
Your high-resolution LEM is controlled 
through space via the paddle knowb 
(thrust) and the buttons (rotation). 



Copies: 
Price: 

Author: 
Available: 



Name: 

System: 

Language: 

Hardware: 



One for you 

$14.95 
Barry Cox 

Barry Cox 

444 Myers Avenue 

Harrisonburg, VA 22801 



UTIL-DS 

Apple II 

Machine language 

Applesoft 

Apple II 



and 



Description: UTIL-DS is a collection of 
several machine language utility routines 
and one Applesoft utility routine. The Ap- 
plesoft utility is a sophisticated format- 
ting routine for numeric output. The 
routine converts numeric values into a 
character string for printing. The user of 



the routine specifies the maximum length 
of the resulting string and the number of 
decimal places to appear in the result. 
Positive and negative numbers can be 
converted by the routine. Comma are in- 
serted in the integer portion of the 
number. The machine language utilities 
consist of several routines to improve the 
error handling capabilities of Applesoft 
programs (e.g. resume execution at the 
statement following the one in error), a 
machine language to Applesoft interface 
utility, a routine to selectively clear arrays 
and a routine for loading machine 
language programs into RAM along with 
an Applesoft program. 



Copies: 
Price: 

Includes: 



Author: 
Available: 



Name: 
System: 
Memory: 
Language: 

Hardware: 



Just released 

$35.00 (Texas residents 

add 5% sales tax) 

Routines on diskette, a 
sample program to 
demonstrate numeric for- 
matting and documenta- 
tion. 

Robert F. Zant 
Decision Systems 
P.O.Box 13006 
Denton, TX 76203 



Dynatext Editor 
PET/CBM, ROM 
16K or more 

Basic, plus machine- 
language repeat key 
Commodore 2022 or 2023 
Printer (optional) 



Description: Authorized PET version of 
"Context Editor", as printed in Kilobaud 
Magazine 5/79. Enhanced and changed in 
many ways for the PET. Uses cassette or 
disk. Has all the desirable features of 
most good word processors, such as 
global search and replace, right justifica- 
tion, cursor editing, etc. Plus dynamic for- 
matiing, the ability to print in any desired 
shape. Holds 7 pages of text at once in a 
32 K PET. 



Copies: 
Price: 

Author: 



Available: 



5, Just Authorized 
$5.00 for cassette, pro- 
gram and instructions. 
James Strasma, based 
on work by Law & Mit- 
chell 

Rev. James Strasma 
120 West King Street 
Decatur, IL 62521 



Name: 


Higher Graphics II 


System: 


Apple 


Memory: 


32K and disk drive 


Hadware: 


Apple I 



tion displays and animation effects. 
Make your programs come alive by utiliz- 
ing the full graphical capabilities of the 
Apple II. The package contains: 

Shape Maker - create shapes with this 
easy to use shape table generator. Start 
new shape tables or add to existing ones. 
Correct shapes as they are being produc- 
ed. Delete unwanted shapes from the 
table. Display any/all shapes with any 
scale or rotation at any time. 

Table Combiner - pull shapes from ex- 
isting general purpose tables and add the 
ones you want into a new special purpose 
table. May combine shapes from any 
number of tables. All shapes can be view- 
ed or deleted. 

Screen Creator - place your shapes on 
the hig-res screen. Add areas of color and 
text to make detailed displays or game 
boards for high resolution games. A 
screen can be created in minutes with 
this easy to use program. Utilizes any 
number of shape tables and allows 
screen to be saved at any time. 

Shapes - four shape tables with over 
100 shapes are provided. Included are 
alphanumerics, chess figures, card sym- 
bols (club, spade, etc), tanks, planes, 
spaceships, ships, cars, trees, moun- 
tains, buildings, etc. Add the shapes you 
like to your own table. 

High Res Text - how to use high resolu- 
tion graphics in your program. Animation 
effects and display techniques. 

Price: $24.00 Retail 

Available: Synergistic Software 

5221 120th Avenue SE 
Bellevue.WA 98006 



Name: 


HYPNOSIS 


System: 


Apple-1 disk drive 


Memory: 


32K 


Language: 


Integer Basic 



Description: Hypnosis is a program thai 
uses Apple's video and sound 
capabilities to aid in suggestive relaxa- 
tion, behavior modification and trance in- 
duction. Visual and auditory patterns are 
fully variable for shape, color and fre- 
quency matching of the subject's alpha 
brain wave rhythm. Designed for health 
professionals and students of the 
medical, psychological and social 
sciences. 



and 



Copies: 


250 plus 


Price: 


$20.00 


Includes: 


Diskette, program 




manual 


Author: 


E.J. Neiburger 


Available: 


Andent Inc. 




1000 North Avenue 




Waukegan, IL 60085 



Description: A collection of programs and 
shape tables that lets any programmer 
create detailed and beautiful high resolu- 
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PROGRESSIVE SOFTWARE 



Missile— Anti— Missile (Aplsft) 



Presents 
Software and Hardware for your APPLE 

$9.95 





Polar Coordinator Plot 



$9.95 





byTD Moteles 

Tables Generator forms shape tables with ease from direc- 
tional vectors-starting address, length and position of each 
shape. Program saves shape tables anywhere in usable 
memory. 

Murray Summers * 3 - 3 ° 

Sales Forecast provides the best forecast using the four 
most popular forecasting techniques: linear regression, log 
trend, power curve trend, and exponential smoothing.Neil D. 
Lipson $995 

Single Drive Copy is a special utility program, written by 
Vince Corsetti in Integer BASIC, that will copy a diskette us- 
ing only one drive. It is supplied on tape and should be load- 
ed on to a diskette. It automatically adjusts for APPLE 
memory size and should be used with DOS 3.2 $19.95 

Curve Fit accepts any number of data points, distributed in 
any fashion, and fits a curve to the set fo points using log 
curve fit, exponential curve fit, least squares, or a power 
curve fit. It will compute the best fit, or employ a specific type 
of fit, and display a graph of the result. By Dave Garson.$9.95 
Touch Typing Tutor teaches typing. Indicates speed and er- 
rors made. Finger Bldrs, Gen. Typing, Basic Language and 
User Supplied. Diskette. Written by Wm. A. Massena. $19.95 
Apple Menu Cookbook index-accessed data storage/retrieval 
program. Recipes stored, umlimited lines per entry. Easy 
editing. Formulated after N.Y. Times Cookbook. Other useful 
features included. Written by Wm. Merlino, M.D. $19.95 

Mailing List Program maintains complete record of name, 
address, phone no., mailing lables accommodated parallel 
card or built-in printer driver.easy data entry 
Diskette. 32K. S19 - 95 

POSTAGE AND HANDLING 
Please add $1 .25 for the first item and $.75 for each ad- 
ditional item. 

• Programs accepted for publication 

■ Highest royalty paid 



Utility Pack combines four versatile programs by Vince Cor- 
setti, for any memory configuration, 

• Integer to Applesoft conversion: Encounter only those syn- 
tax errors unique to Applesoft after using this program to 
convert any Integer BASIC source. 

- Disk Append: Merge any two Integer BASIC sources into a 
single program on disk. 

• Interger BASIC copy: Replicate an Integer BASIC program 
from one disk to another.as often as required, with a single 
keystroke. 

■ Applesoft Update: Modify Applesoft on the disk to eliminate 
the heading always produced when it is first run. 

• Binary Copy: Automatically determines the length and star- 
ting address of a program while copying its binary file from 
one disk to another in response to a single keystroke. $9.95 

Solitare — Old European peg game, played by one (similar 

to Chinese checkers). Object — to finish with last peg in 

center. 

Charles B. Smith $9-95 



mult., div,.) grades 
$19.95 



Water The Flowers — Math (add., subt. 
1-6. (disk) 
Judy Pegg 

Catch The Pig — teaches the cartesian coordinate 

system. Educ. game, upper grade school level, 1-4 
students, many levels of play. Disk or tape. 
Judy Pegg $16.95 (disk) $9.95 (tape) 

Blockade lets two players compete by building walls to 
obstruct each other. An exciting game written in Integer 
BASIC by Vince Corsetti. $9-95 

Saucer Invasion, Space Maze, Starwars, Rocket Pilot: 
Written by Bob Bishop Each $9.95 

Hardware 

Light Pen with seven supporting routines. The light meter 
takes intensity readings every fraction of a second from to 
588. The light graph generates a display of light intensity on 
the screen. The light pen connects points that have been 
drawn on the screen, in low or high resolution, and displays 
their coordinates. A special utility displays any number of 
points on the screen, for use in menu selection or games, 
and selects a point when the light pen touches it. The 
package includes a light pen calculator and light pen TIC 
TAC TOE. Neil D. Lipson's programs use artificial in- 
telligence and are not confused by outside light. The HIRES 
light pen, only requires 48K and ROM card $34.95 

TO ORDER 

Send Check or Money Order to: 

P.O Box 273 

Plymouth Meeting, PA 19462 

PA residents add 6% sales tax. 




U.S. and foreign dealer and distributor inquires invited 
All programs require 16K memory unless specified 



6502 Bibliography: Part XX 



Dr. William R. Dial 

438 Roslyn Avenue 

Akron, OH 44320 



594. MICRO 17 (October 1979) 

Peck, Robert A., "SYM-1 6532 Programmable Timer," pgs. 
55-56. 

The 6532 programmmable timer is useful as a backup timer 

or as a loop controller. 

Kintz, Robert T., "A Real-Time Clock for OSI Disk Systems," 
pgs. 59-60. 

Dial, William R., "6502 Bibliography: Part XIII," pgs. 61-62. 

About 70 more references on the 6502. 

595. Applesauce 1, No. 1 (March 1979) 

Ohrbach, Jeffrey,"The 6502 is Stacked," pgs. 5-6. 

Discussion toward understanding those OP-Codes affec- 
ting the machine stack of the Apple. 

Wigginton, Randy, "Apple's Bootleg Assembler," pgs. 11-14. 
Documentation for the program 'Randy's Text Editor and 
Weekend Assembler (Ted II)." 

596. Applesauce 1, No. 2 (April 1979) 

Hyde, Randall, "Loaded and Gone," pgs. 5-6. 
How to make your own "load and go" tapes for the Apple. 

Emrich, Dick, "Simple Sort," pg. 8. 
A simple bubble sort for the Apple. 

Curtis. Frank, "Numerical Control Programming," pgs. 11-12. 
Related to the control of machine tools. 

Baker, Dwight, "The Assembly Line," pgs. 15-16. 
A tutorial using Randy's Assembler. 

Anon., "Docu-Prog: Lazer's Text Editing System," pgs. 16-18. 
Documentation for the Lazer Text Editor. 

597. Applesauce 1, No. 3 (May, 1979) 

Walls, William, "Yes, Virginia, You CAN Save Data," pgs. 4-6. 
A tutorial on Data Storage Methods. 

Hyde, Randy, "The Apple Monitor— Part 1," pgs. 8-9. 
Dealing with the many uses of the Apple Monitor. 

Irvine, Al, "Docu-Prog: Program Compare," pgs. 10-11. 
Documentation for PROGRAM COMPARE which compares 
the listings of two programs. 

Paymar. Dan. "A Disc Write Protect/Enable Override Switch," 



pg. 12. 

A simple hardware modification for your Apple Disc. 

Anon., "Charts," pgs. 14-16. 
Apple II ASCII CHART; Apple Integer Basic HEX 
Representation-Numerical Order; Hex Representation 
Chart-Alphabetical; Vector Table Address Chart. 

598. Applesauce 1, No. 4 (June 1979) 

Curtis, Frank, "Dr. Memory — A New Text Processor," pgs. 5-6. 
A review. 

Hyde, Randall, "Single Disk Text File Transfer," pg. 8. 
Transfer a text file with only one disk drive. 

Anon., "LISA: What is an Interactive Assembler Anyway?" 
pgs. 8-9. 
A review of LISA. 

Lu, Ron, "Docu-Prog: Beneath Apple Manor," pgs. 10-11. 
Documentation and Review of "Beneath Apple Manor," an 
adventure type game. 

Anon., "Apple II Mini-assembler F666G," pg. 12. 
How to use the mini-assembler. 

Haefner, Mike S., "Processor Status Register 'P'," pgs. 13-16. 
Discussion of the processor status register and chart of 
flags. 

Spurlock, Loy, "Hex Representation Chart," pg. 13. 
Discussion of the Apple Token Chart. 

Anon., "Zero Page Chart," pg. 14. 

Discussion of the contents of the Apple page zero. 

Anon., "Apple II 6502 OP CODE Chart," pg. 15. 
Chart showing the codes for different types of addressing 
on the 6502. 

Anon., "Integer Basic Internals," pg. 20. 

List of variables used by basic; integer basic routines. 

Anon., "Useful Basic Pointers," pg. 22. 
Discussion and list of addresses. 

Tognazzini. Bruce. "Apple Basic Interpreter Instruction Set," 
pg. 22. 

Names and addresses. 

Anon.. "Apple DOS Symbol Table," pg. 27. 
Names and addresses. 
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599. Applesauce 1, No. 5 (July/August 1979) 

Lemens, Vernon Jr., "Superchip Eccentricities," pgs. 8-13. 
A tutorial on the Superchip for the Apple. 

Anon., "New Product Releases," pgs. 10-11. 

Description of the Dan Paymar lowe case chip, the Univer- 
sal Parallel card, the Apple bulletin board system, etc. 

Anon., "Original Apple Corps' Program Library," pgs. 16-17. 
Program library. 

Lenz, John and Spurlock, Loy, "From the Forum," pgs. 20-22. 
A few Calls and JSR's for the Apple. 

Diay, Robert, "The Assembly Line: Page List Program," pgs. 
23-24. 

Page List is a machine language routine to list twenty lines 

at a time. 

Amromin, Joel L, "Apple II Slowlist," pgs. 24-25. 
Paddle-controlled slowlist program. 

Hyde, Randy, "UCSD PASCAL," pg. 29. 
A short tutorial on PASCAL for the Apple. 

600. Byte 4, No. 11 (November 1979) 

Partyka, Dave, "Shape Table Conversion for the Apple II," pg. 
63. 

Hints for using shape tables. 

Govind, P.K., "Interfacing the PET to a Line Printer," pgs. 
98-102. 

Interfacing the 8-bit user port on the PET 2001, including 

software program "PRINTSCREEN." 

601. Creative Computing 5, No. 11 (November 1979) 

Heuer, Randy, "PET Software from Creative Software," pg. 46. 
Five programs are reviewed. 

Daro, Paul, "A Home Control System," pgs. 54-59. 
Description of the use of the Introl X/10 system marketed 
by Mountain Hardware. 

Yob, Gregory, "Personal Electronic Transactions," pgs. 
183-185. 

This month's column discusses Software in ROM; some 

graphics gizmos; animation routines, etc. 

602. Stems from Apple 2, Iss. 10 (October 1979) 

Hoggatt, Ken, "Ken's Korner," pg. 3. 
A short tutorial on Pascal with sample routines. 

Keyes, Pat, "ROM Applesoft II Vector Chart," pgs. 4-5. 
Machine language subroutines and keywords. 

Newman, Will II, "File Handler," pgs. 6-9. 
Routine for handling files. 

603. MICRO, No. 18 (November 1979) 

Wells, George, "Dual Tape Drive for SYM-1 Basic," pgs. 5-7. 
Make your SYM-1 Basic work with two tape recorders and 
manage tape cassette files. 

Murphy, S. R-, "Some Useful Memory Locations and 
Subroutines for OSI Basic in ROM," pgs. 9-10. 
Where some important subroutines reside in OSI Basic. 

Hawthorne, Alan R., "A Tape Indexing System for the PET," 
pgs. 11-13. 

Rapid indexing of the PET cassette. 

Swanson, Mark, "Subroutine Parameter Passing," pgs. 14-15. 

A technique to facilitate passing parameters to 

subroutines. 
Bishop, Bob, "Apple II Hires Picture Compression," pgs. 
17-24. 

How to put several times as many hires slides on a single 

disk as previously done. Used in Bob Bishop's Super Slide 

Show. 



Floeter, Alan D., "Assembly Language Applesoft Renumber," 
pgs. 27-29. 
A very fast renumber program. 

Bruey, Alfred J., "Performing Math Functions in Machine 
Language," pgs. 30-31. 
Math for the KIM-1. 

Hooper, Philip K., "TSAR; A Time Sharing Administrative 
Routine for the KIM-1," pgs. 35-41. 

Tsar is a super monitor which supports time-sharing for the 

KIM. 

Dennis, Jim, "Interfacing the CI-812 to the KIM," pgs. 43-44. 
The Percom CI-812 contains a full-duplex data terminal in- 
terface and a fast cassette (2400 baud). 

Hill, Alan G., "Ampersort," pg. 45. 
A corrected listing for this fast sort routine. 

Leary, Richard A., "SYM-1 Baudot TTY Interface," pgs. 49-54. 
Teletype with your SYM-1. 

Rowe, Mike (staff), "The MICRO Software Catalog: XIV," pgs. 
55-56. 
Six new programs for 6502 devices are reviewed. 

Irwin, Paul, "Alarming Apple," pgs. 59-60. 

Teach your Apple to respond to errors with an alarm and 

keyboard lockout. 
Dial, William R., "6502 Bibliography: Part XIV," pgs. 61-62. 

Fifty-five more references in the 6502 literature. 

604. Control Engineering (October 1979) 

Faust, Gregory, "Programmable Controller Offers Fiber Optic 

Data Link for Remote I/O," pgs. 53-54. 

Both the fiber optic interface and the remote I/O use a 6502 
microprocessor for communication purposes. 

605. Rainbow 1, Iss. 9 (October 1979) 

Fleming, Jim, "Updating the ARESCO DMS," pgs. 7-16. 
An improved file management system. 

Vermehr, Jay, "An Apple Recorder Box," pgs. 19-20. 
A very useful box to use between the Apple and the tape- 
deck. 

Anstis. Stuart M., "Rocket Lander in Lo-Res Graphics," pgs. 

21-24. 

A game in Apple II Applesoft. 

606. The Paper 2, Iss. 8 (October 1979) 

Wachtel, A., and Szepesi, Z., "Pythagorean Triplets 
Revisited," pgs. 12-17. 
A program for the PET. 

Costarakis, Dennis A., "A Screen Dump Subroutine for Use 
with the 2022/2023 Printers," pgs. 23-24. 
Routine for the PET. 
607.Personal Computing 3, No 12 (December 1979) 

Forbes, John L, "Applesoft Conversions," pg. 10 
Conversion of a program in PT Basic to Applesoft Basic. 

Whack, Margaret, "Create Your Own Periodical Guide," pgs 
69-70. 

Catalog your favorite computer magazine articles. 

608. Recreational Computing 8, No 3 (Nov/Dec 1979) 

Carpenter, Chuck, "Apple ll'S Three M's," pgs. 28-31. 
More on Memory, Monitor and Machine language. 

Bruey, Alfred J. ."Making Music on the PET," pgs. 49-51. 
Software and hardware for a musical PET. 

609. Kilobaud Microcomputing No 36 (December 1979) 

Lindsay, Len, "Pet-Pourri," pg. 12. 

Discusses Commodore Word Processor and Printer, 
Games, Graphics programs. 
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Lancaster, Don, "Lowercase for Your Apple II," pgs. 34-42. 
Now for the software to complete this two-part article. 

Haehn, Lou, "Chess I for the Apple II," pgs. 46-52. 
Writing a chess program for the Apple II. 

Lary, Richard A., "Reverse Video from OSI's 540 Board," pgs. 
128-129. 
Black on white to enchance graphics displays. 

David, D. J., "PET's Machine Language Monitor," pgs. 134-140. 
A review and analysis of the PET Monitor. 

610. Call Apple 2, No 8 (October 1979) 

Cahill, Gerald, "Auto Number," pgs. 5-8. 
A program to automatically number Applesoft programs as 
they are input. 

Foote, Gary A., "Multiple Disk Catalog," pg. 11. 
A special program to read catalogs off Apple disks for entry 
into File Cabinet. 

Merchant, Fred, "Instructions for Running Multiple Disk 
Catalog," pg. 13. 

Detailed instructions for running Diskcat. 

Barnes, Keith Allen, "File Cabinet Improvements," pgs. 13-14. 
Fixes to make this program work better on the Apple. 

Golding, Val J., "So Who Needs Applesoft (Revisited)," pgs. 

15-16. 
A tutorial for the Apple including INT BASIC VAL FN SUB- 
ROUTINE. 

Corsetti, Vince, "Self Writer," pg. 18. 
This program performs the equivalent of an exec file 
without using DOS. 

Reynolds, Lee, "Logical Variables in Apple II Basic," pas. 
21-22. 
A tutorial. 

Golding, Val J., "Exec File Shortcut," pg. 24. 
A short program to create a text file that when EXEC'd 
would BLOAD a binary program, set HIMEM, and Run a 
basic program. 

Golding, Val J., "Flash Card Modifications," pgs. 24-25. 
How to provide different data sets from a disk to run the 
Flash Card Program. 

Krantz, Bill, "Write -Apple," pgs. 26-27. 
All about using the High Speed Serial Card with Integral 
Data IP 125/225 printer. 

Hockenhull, James L., "Simulating a Two-Dimensional Matrix 
from Integer Basic," pgs. 30-31. 
A new way of handling Hi-Res programs. 

Alex, Steve, "Applesoft II Firmware Card Hi-Res Routines," 

pgs. 33-34, 
How to use the hi-res graphics routines available on the Ap- 
plesoft II firmware card from assembly programs. 

Garson, David B., "Poor Man's PRINT— USING Program," pg. 
34. 

A useful utility routine. 

611. Fort Worth Apple Users Group 1, No. 4, (October 15, 1979). 
Meador, Lee, "Interrupt Daisy Chain," pg. 2. 

An explanation of daisy chain interrupts. 

Meador, Lee, "Disassembly of Dos 3.2," pg. 4-14. 
Disassembly program. 

612. Stems from Apple 2, Issue 11 (Nov. 1979) 

Dolema, Nels, "Worm," pg. 4. 
A new version of the "WORM" with paddle control. 



613. Abacus II Newsletter I, Iss. 11 (Nov. 1979) 

Anon, "DOS 3.2 R.H.D.," pg. 2. 

Addresses and functions of DOS 3.2 for Apple. 

Howard, Clifton M., "Hex/Dec Conversion Chart," pg. 5. 
Poor Man's Ti programmer. 

Howard, Clifton M., "Diablo Character Values,"pg. 6. 
Useful table for Apple owners using the Diable printer. 

Howard, Clifton M., "Interpretation of Memory," pg. 7. 
Apple II Basic Integer Memory Interpretation. 

Freeland, Bruce, "Plotting Algorithm," pg. 8. 
Apple II page I layout and map. 

Yee, David R., "Stop that Blinking Cursor,;; pg. 12. 
Now you can jazz up your own programs with a custom Cur- 
sor. 

Anon, "Disk Access Update," pg. 12. 
A fix for a previous routine. 

Staff, "Control Character Show," pg. 12. 
Show up those hidden control characters. 

614. The Target, (Nov/Dec 1979) 

Anon, "Basic Short Cut," pg. 2-4. 
This routine automatically inputs characters to the Basic 
interpreter thus freeing the user of some drudgery of enter- 
ing programs, into the AIM 65. 

Butterfield, Jim, "Inside Basic-Tokens," pg. 4-8. 
Key addresses, zero page usage, ROM organization, etc. for 
the AIM 65. 

Bressen, Steve, "Roll," pg. 9. 
Program to scroll a message onto the AIM-65 display. 

615. Southeastern Software Newsletter, No. 14, (Nov. 1979) 

Anon, "Length and Starting Address of Binary Files," pg. 4-5. 
How to find binary program addresses in your Apple. 

Anon, "El Cheapo Pascal Lower/UPPER CaseWriter," pg. 5-7. 
A tutorial Pascal program. 

Carpenter, Chuck, "Game Paddle I/O Applications," pg. 7-9. 
An informative "How to" article. 

The Apple Shoppe 1, No. 4, (Nov. 1979). 

Van Winkle, Don, "Hi-Res Artillery Game," pg. 4-8. 
A HiRes game of artillery, shooting over random terrains at 
the enemy gun. 

Welman, Chuck, "Easy writer— Text Editor Review," pg. 10-11. 
A rather favorable review of this text editor. 

Anon, "Plotting Functions," pg. 12-14. 
A tutorial for the Apple. 

Welman, Chuck, "A Review of 'APPLE DOC," pg. 15. 
Useful Utility to aid programmers. 

Anon, "String Magic," pg. 16. 
All about strings. 

Smith, David E., "Language Lab; Apple Pascal," pg. 17-22. 
A tutorial on Pascal with program examples. 

Crouch, Bill, "Apple Text Editors,;; pg. 23. 

Reviews Applecations Unlimited Version 2.2, with Apple Pie 
Text Editor and The Word Weaver. 

Crouch, Bill, "Apple II Text Processing System," pg. 27-28. 
A review of this text editor and assembler. 

617. Appleseed Newsletter 1 No. 12 (Dec. 15, 1979) 

Hyde, Bill, "International Apple Core," pg. 1. 
The International Apple Core is being formed as an 
organization to provide software, information and other ser- 
vices to the Apple user. Officers include Val Golding, Ken 
Silverman, Dave Gordon, Neil Lipsan, etc. 
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618. Apple Bits (Dec. 1979) 

Geier, Bob, "Basic Errors?," pg. 3. 

How to rewrite your disk commands on the Apple. 

Anon, "Rumor Mill," pg. 3. 

The new Radio Shack TRS-90 will probabally be based on 
the new Motorola 6809 microprocessor. The Apple III may 
choose this chip or a new chip by MOS Technology. There 
is an unconfirmed rumor that Heath will discontinue pro- 
duction of the h-8. 

619. Byte 4, No. 11 (Nov. 1979) 

Anon, "Free Newsletter," (Nov. 1979) 

Hands On! is a free newsletter published three times a year 
for science and technology educators and the initial issue 
contains an article "A Biased Introduction to the World of 
the 6502 Microprocessor." 

620. Fort Worth Apple User Group Newsletter, No. 5 (Nov. 15, 
1979) 

Cahill, Gerald, "Auto Number," pg. 1. 

Meador, Lee, "DOS Disassembly," pg. 2-16. 

Listing of the assembly language for the DOS 3.2. Also a 
detailed listing and explanation of the RWTS Routine. 

Meador, Lee, "Drawer-for Hi-Res Pictures," pg. 17-19. 

Hoyt, Jim, "Special Subroutine," pg. 19. 
Subroutine to allow prohibited characters like commas, 
etc. in string inputs. 

621. Contact No. 6 (Oct. 1979) 

Anon, "Invisible Writing," pg. 5. 

How to plot one page of graphics while displaying the 
other. 

Anon, "DOS Update for Dual Drive Users," pg. 6. 

Improve the DOS 3.2 by updating to 3.2.1 on the Apple. 

Anon, "Dollars and Cents," pg. 8-9. 

Formats numeric output on the Apple to a dollar and cents 
format. 

Anon, "Restore to Line Number," pg. 9-10. 

A demo of how to do a RESTORE statement to a particular 

line number, on the Apple II. 
Anon, "What Interface Card is in this System, Anyhow?", pg. 
10. 

With this program, CONFIG, it is possible to tell just what 

interface is in a particular slot. 

622. Rainbow 1, Iss. 10 (Nov. 1979) 

Deardon, Dr. Hinkley W., "From the Pits," pg. 15-16. 
A two bit serial interface for the Selectric typewriter. 

Wachtel, A. and Szepesi, Z., "The Development of a Basic- 
Program," pg. 9-11. 
Illustrating the many ways in which a seemingly simple pro- 
gramming task on the Apple can be improved. 
Laudereau, Terry L, "Pokeing Machine Language from 
Basic," pg. 17-18. 
A tutorial article on entering machine language into the Ap- 
ple II. 
Wagner, Roger, "Fast Moves in Applesoft," pg. 19-20. 

How to use the MOVE routine present in the Monitor by 
calling from Applesoft using a special routine. 

Wagner, Roger, "One Less Error," pg. 19-20. 

How to keep Apple's Integer Basic programs from bombing 
when dealing with an address greater than 32767. 

623. Apple Peelings 1, No. 3, (Nov. 1979) 

Anon, "November DOM (Disk of the Month)," pg. 3. 
A dozen good programs plus Library List 10-79, the latest 



listing of the SF Apple Core's complete library as of the last 
of October, 1979. 

Johnson, Allen, "What Is It?," pg. 4. 

A short routine to identify the DOS 3.1 or 3.2 on Apple 
diskettes. 

Fisher, Frank E., "Slot -s as Variables," pg. 4. 
Specifying I/O slots in the Apple as variables and using in 
programs. 

624. The Paper 1, No. 3 (Nov. 1979) 

Lee, Arnie, "Clocks and Timers," pg. 4. 
How to use the microprocessor clock in the PET to use in a 
timer or real time clock. 

Anon, "Screen Display and Cursor Positioning," pg. 7-9. 
A short tutorial for the PET. 

Anon, "To Write a Character String to the Screen," pg. 9-10. 
Short tutorials on this and a number of other short PET 
routines. 

Anon, "PET USER GROUPS," pg. 15. 
A list of about 40 user groups for the PET. 

Szepesi, Zoltan, "Using the Monitor Subroutines," pg. 16-21. 
A tutorial to show how the PET actually runs programs. 

625. Apple-Com-Post No. 4 (Nov. 1979) 

Anon, "Software Tups and Tricks," (in German), pg. 7. 
All about handling numbers on the Apple. 

626. Call-Apple 2, No. 9 (Nov./Dec, 1979) 

Greenfarb, Sandy, "Internal Structure of Integer B asic," pg. 
5-10. 
A tutorial on Integer Basic. 

Golding, Val, "Why Variables," pgs. 11-12. 
Why replace numeric constants with variables in both Ap- 
ple Integer and Applesoft. 

Hyde, Randall, "The Assembly Line," pgs. 14-17. 
Benchmarking Sweet 16 with 6502 Assembly Language. 
6502 Machine code runs 5-7 times as fast as Sweet 16 but 
Sweet 16 code requires only about half as much memory to 
perform an equivalent function, on the Apple. 

Sedgewick, Dick, "Sedgewick Plays it Straight," pgs. 19-20. 
A tutorial dealing with the consequences of tokenizing, etc. 

Golding, Val, "Basic Memory Move," pg. 23. 
A hex memory move program for the Apple, and a cor- 
responding one in Decimal. 

Cox, Ross E., "Life with an Apple," pgs. 30-34. 
All about how to make Life more enjoyable by improving 
The Game of Life on the Apple. 

Hilger, Jim, "Apple Gaming: Playing Card Generation," pgs. 
39-45. 

General purpose routines that will generate hi-res images 

of playing cards. 

627. Stems from Apple 2, Iss. 12 (December 1979) 

Reinhardt, John, "President's Message," pg. 1. 
An announcement about the newly formed "International 
Apple Core Club" to which individual User Groups may 
subscribe. 

Stein, Greg, "Circles," pg. 3. 
A short circle drawing program. 

Anon., "The Twelve days of Christmas," pg. 3. 
A program which prints the traditional Crhristmas song. 

Ward, Dennis, "Do Your Words Runneth Over?," pg. 4. 
How to avoid split words, bad spacing, etc. 

Doeleman, Nels, "The Appl-Ogical Way to Arrange Numbers 
in DEcending Order," pg. 5. 
Program to arrange numbers. 
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SYM-t 

INTERACTIVE TRACE/DEBUG 
MONITOR ENTENSION COMMANDS 



MONEX:"-NEW COMMANDS:-Disassem- 
ble 'Relocate "Find "ASCII dump "Trace 
(Sym-Bug) "Checksum calculator "BRK 
set/delete 'More 

SYM-BUG: Trace with dissassemble and 
register list; skip and continue subcom- 
mands. BRK and Single Step. 
PRICES: CASSETTE $15.95 )at $200 or 
$3800)EPROM (2716-5V) (at $FOO0) $49.95 
Commented Source $9.95 Custom 
assembly: add $2.00. User Manual separate- 
ly: $5.95 (applicable to purchase). All 1st 
class PPD continental U.S. Other add $2.50 

OTHER PRODUCTS: AIM — SYM — KIM 

Optimized" software lor Optimal 

Technology's EP-2A prommer. Includes 
erase verify and full prompting. Let your 
computer do the work. Includes listing, 
cassette, instructions. Specify system. 
$9.95 

"""Complete hard-and software interface 
for Texas Instruments 12/20 column thermal 
printer. Requires one eight bit port. Perfect 
for dedicated control applications. Com- 
plete schematics, listings instruction. 
Specify system. $9.95 



J Holtzman 
6820 Delmar, 203 
St. Louis, MO 63130 
314-863-5209 





Progressive 
Computer 
Software 

405 Corbin Road 
York. PA 17403 



PRESENTS 

the 

MACHINE LANGUAGE 

EXTERMINATOR 

Get rid of those bugs the way the experts 
do. Our TEMA program allows you to 
easily locate errors in any machine 
language program. 

ASCII or hex strings can be located, 
registers and memory locations 
displayed, plusmany other features that 
are invaluable for debugging. 
Available now on cassette or disk. 48K 
Apple required. 

Cassette— $19.95 Disk— $24.95 



APPLE ONLY 




Also Available,, 




Cassette 


Disk 


One-Arm Bandit (32K) 9.95 


14.95 


Card Shark (INT) 7.95 


9.95 


High Roller (Applesoft) 7.95 


9.95 


Hi-Res Sub Game (32K) 14.95 


19.95 


Adult Games Pack 7.95 


9.95 


Trend Line Analysis 




(48K. Applesoft 8 ROM) 9.95 


14.95 



CUSTOM PROGRAMMING 

We specialize in custom software. Modifica- 
tions to existing programs or completely 
specialized to suit your needs. Write for details. 



Announcing 
The Micro 
LIMERICK 
CONTEST 



You could win a free 1-year 
subscription of MICRO if your 
limerick is judged to be the 
best by our staff. 

The American Heritage Dic- 
tionary defines a limerick as: 
"A light humerous or nonsen- 
sical verse of five lines with the 
rhyme scheme aabba". For 
those of you who may not have 
been English majors, here is an 
example: 

There was a young princess 

from Niger, 
Who smiled as she rode on a 
tiger. 
They returned from the ride 
With the princess inside 
And the smile on the face of 
the tiger. 

To win our limerick contest, all 
you have to do is come up with 
an original 5-line verse about 
MICRO. 

Shouldn't be too tough, right? 
Winners will be judged on 
creativity, originality, and 
above all, humor. Remember to 
follow the rules of a limerick, 
and no cheating by using the 
same word to end the first, se- 
cond and/or fifth lines! And 
please, keep them clean. 

The winning limerick will be 
published in the September 
issue, along with some 
honorable mention runners-up. 



Please send all entries to: 

MICRO LIMERICK CONTEST 

P.O. Box 6502 

Chelmsford, MA 01824 



The Age of 
Affordable 
Computing 

TERMINALS 

Has Arrived. 



HAVE 
YOU 




32 64 CHARACTER LINES 



$750.00 




CAT by NOVATION 300baud $179.00 



SERIAL PORT MODIFICATION $75.00 
of C4P Color by us 






AT V Microverter 



$35.00 



SI C4P Color Cassette 

V T 52 Terminal Simulator Prog. $19.95 



Buy separably for $1,058.95 

(you supply TV and cassette recorder) 

or your complete checked out as above 

VT52 $995 

see mis OHIO SCIENTIFIC 

dealer today! 

CDmPUTERSHDP 

Boston Cambridge 



* 



. 



590Comm Ave 


288 Norfolk St 


(across Irom B U ) 


(nearM 1 T.) 


247-0700 


661-2670 



I 




Index, Volume Number 3 

(Issues 13-24) 
(June 1979-May 1980) 



GENERAL 



6502 Information Resources Updated 


13:29 


William R. Dial 




Computer Determined Parameters for 


13:38 


Free-Radial Polymerization 




L.S. Reich 




The MICRO Software Catalog:IX 


13:53 


Mike Rowe 




The MICRO Software Catalog:X 


14:54 


Mike Rowe 




To Tape or Not to Tape: What is the Question? 


14:57 


Noel G. Biles 




6502 Bibliography XI 


14:61 


William Dial 




Replace that PIA with a VIA 


15:17 


E.D. Morris Jr. 




Tokens 


15:20 


E.D. Morris Jr. 




The MICRO Software Catalog: XI 


15:38 


Mike Rowe 




Interfacing the Analog Devices 7570J A/D Converter 


15:40 


Marvin L DeJong 




6502 Bibliography XII 


15:53 


William Dial 




The MICRO Software Catalog: XII 


16:51 


Mike Rowe 




8080 Simulation with a 6502 


16:53 


Dann McCreary 




Writing for MICRO 


16:59 


Shawn Spilman 




Nicer Writer 


17:5 


Rick Connolly 




6522 Timimg and Counting Techniques 


17:27 


Marvin L. DeJong 




The MICRO Software Catalog: XIII 


17:49 


Mike Rowe 




6502 Bibliography: XIII 


17:61 


William Dial 




Subroutine Parameter Passing 


18:14 


Mark Swanson 




Performing Math Functions in Machine Language 


18:30 


Alfred J. Bruey 




The MICRO Software Catalog: XIV 


18:55 


Mike Rowe 




6502 Bibliography: XIV 


18:61 


William Dial 




Sum Test: A Memory Test Routine for the 6502 


19:73 


S. Felton Mitchell Jr. 




The MICRO Software Catalog: XV 


19:75 


Mike Rowe 




6502 Bibliography: XV 


19:77 


William Dial 





Why a PET, APPLE, 6502 Basic Compiler? 20:9 

Bruce M. Beach 
Lifetime of a Non-renewable Resource 20:21 

Marvine L. DeJong 
The MICRO Software Catalog: XVI 20:51 

Mike Rowe 
6502 Bibliography: XVI 20:61 

William Dial 
The Binary Sort 21:15 

Robert Phillips 
MICRO Club Forum 21:29 

staff 
The MICRO Software Catalog: XVII 21:55 

Mike Rowe 
6502 Bibliography: XVII 21:59 

William Dial 
Beginning Boolean: A Brief Introduction to Boolean 22:29 

Algebra for Computerists 

Marvin L DeJong 
Program Checksum Calculator 22:39 

Nicholas Vrtis 
The MICRO Software Catalog: XVIII 22:63 

Mike Rowe 
6502 Bibliography: XVIII 22:67 

William Dial 
The SY6516 Pseudo-16 Bit Processor 23:36 

Randall Hyde 
The MICRO Software Catalog: XIX 23:71 

Mike Rowe 
6502 Bibliography: XIX 23:77 

William Dial 
A Simple Temperature Measurement Program 24:19 

and Interface 

Marvin L DeJong 
MICRO Club Circuit 24:66 

staff 
The MICRO Software Catalog: XX 24:69 

Mike Rowe 
6502 Bibliography: XX 24:73 

William Dial 

AIM, SYM, AND KIM 

A Symphony in Stereo 13:17 

Phillip M. Rinard 
Reading KIM Tapes on the AIM and SYM 13:34 

Robert M. Tripp 
AIM 6522 Based Frequency Counter 13:41 

Marvin L. DeJong 
KIM — The Tunesmith 13:43 

Anthony R. Scarpelli 
SYM-1 Speak to Me 13:57 

Jack Gieryic 
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AIM Your Spouse Towards Success at the Supermarket 14:19 

Melville Evans & Vernon Larrowe 
SYM & AIM Memory Expansion 14:30 

Paul Smola 
The First Book of KIM — On a SYM 14:35 

Nicholas Vritis 
Extending the SYM-1 Monitor 15:9 

Nicholas Vrtis 
EPROM for the KIM 15:25 

William C. Clements Jr. 
SYMple Memory Expansion 15:42 

John M. Blalock 
An AIM-65 Notepad 16:11 

Marvin L. DeJong 
SYM-1 Event Timer 16:26 

Stephen J. Fan's 
AIM-65 in the Ham Shack 16:29 

Marvin L. DeJong 
Tiny Pilot:An Educational Language for the 6502 16:41 

Nicholas Vrtis 
Card Shuffling Program for the KIM-1 17:4i 

Hark Chan 
SYM-1 6532 Programmable Timer 17:55 

Robert A. Peck 
Dual Tape Drive for SYM-1 Basic 18:5 

George Wells 
TSAR: A Time Sharing Administrative Routine (KIM) 18:35 

Philip K. Hooper 
Interfacing the C1-812 to the KIM 18:43 

Jim Dennis 
SYM-1 Baudot TTY Interface 18:49 

Richard A. Leary 
Sharpen Your AIM 19:37 

Robert E. Babcock 
Time of Day Clock and Calendar for the SYM-1 19:67 

Casmir J. Suchyta III and Paul W. Zitewitz 
SYM-1 Tape Verification 20:35 

Jack Gieryic 
Symbol Table Sorter/Printer for the AIM Assembler 20:43 

Mel Evans 
SYM Staged Loading Technique for Segmented Program 20:59 

Robert A. Peck 
Expanding the SYM-1 21:5 

Robert A. Peck 
A Complete Morse Code Send/Receive Package 21:19 

Marvin L. DeJong 
KIM-1 Tape Recorder Controller 21:35 

Michael Urban 
Clocking KIM 22:45 

Ronald A. Guest 
SYMple Basic Data Files 23:21 

John Blalock 
A Perpetual Calendar Printer for the AIM 23:27 

Mel Evans 
KIM Scorekeeper 23:59 

Joel Swank 
SYM-1 Basic "GET" Command 24:7 

George H. Wells Jr. 
A Formatted Dump Routine for the AIM 24:29 

W.E. Wilson 
SYM-1 Sends Morse Code 24:49 

Ralph R. Orton 
Expand Kim-1 Versatility in Systems Application 24:63 

Ralph Tenny 

PET 

Case of the Missing Tape Counter 13:11 

William F. Pytlik 
Reading PET Cassettes without a PET 13:61 

David P. Kemp 



Boolean Equations Reduced on the PET 14:23 

Alan K. Christensen 
PET Cassette I/O 15:19 

Ronald C. Smith 
Plotting a Revolution 16:5 

John Sherburne 
Move It: Relocating PET Source Programs & Object Code 16:17 

Prof. Harvey B. Herman 
Speech Processor for the PET 16:35 

Charles R. Husbands 
Hooking PET to Ma Bell 17:11 

C.H. Scanlon 
A Tape Indexing System for the PET 18:11 

Alan R. Hawthorne 
Relocating PET Basic Programs 19:25 

Michael Tulloch 
An Additional I/O Interface for the PET 19:40 

Kevin Erler 
A 60 x 80 Life for the PET 19:45 

Werner Kolbe 
Multiplexing PET's User Port 21:13 

Ed Morris 
A Machine Language Screen Print Program for the Old 22:13 
or New PET 

Kenneth Finn 
Stop That PET! 22:57 

Gary Bullard 
PET Keysort 23:43 

Rev. James Strasma 
Plotting with Special Character Graphics 24:11 

Dale DePriest 
New and Better PET User Port Printer Routines 24:33 

Michael Tulloch 
Keysort Update 24:58 

Rev. James Strasma 



APPLE 

Harmonic Analysis for the APPLE 

Charles B. Putney 
Sorting with the APPLE II 

Gary A. Foote 
The Color Gun for the APPLE II 

Neil D. Lipson 
A Baudot Teletype Driver for the APPLE II 

Lt. Robert Carlson, USN 
Intercepting DOS Errors from Integer Basic 

Andy Hertzfeld 
Screen Dump to Printer for the APPLE II 

R.M. Mottola 
Ampersort 

Alan G. Hill 
APPLE II Serial Output Made Simple 

Donald W. Bixby 
A Better Life for Your APPLE 

L. William Bradford 
What's Where in the APPLE 

Prof. William F. Luebbert 
Define HIRES Characters for the APPLE II 

Robert F. Zant 
Common Variables on the APPLE II 

Robert F. Zant 
Applesoft Renumbering 

J.D. Childress 
Life in the Fast Lane 

Richard R. Auricchio 
Disassembling the DOS 3.2 

William Reynolds 
Spelunker 

Thomas R. Mimlitch 



13:5 

13:21 

13:31 

14:5 

14:17 

14:27 

14:39 

15:5 

15:22 

15:29 

15:44 

15:47 

16:15 

16:21 

17:7 

17:15 



24:78 



MICRO — The 6502 Journal 



May, 1980 



I 



I 



APPLE II HIRES Picture Compression 

Bob Bishop 
Assembly Language Applesoft Renumber 

Alan D. Floeter 
Alarming APPLE 

Paul Irwin 
Data Statement Generator 

Virginia Brady 
How to do a Shape Table Easily and Correctly 

John Figueras 
Applesoft Program Relocation 

George S. Guild, Jr. 
KIM & SYM Format Cassette Tapes on APPLE II 

Steven Welch 
APPLE II Speed Typing Test with Input Time Clock 

John Broderick 
Tape Execute File-Create and Use 

Allen J. Lacy 
Human Physiological Parameters 

Dr. L.S. Reich 
Sweet-16 Programming Using Macros 

Richard C. Vile, Jr. 
Screen Write/File Routine 

B.E. Baxter 
Search/Change in Applesoft 

J.D. Childress 
A HIRES Graph-Plotting Subroutine 

Richard Fam 
APPLE II Floating Pint Utility Routine 

Harry L. Pruetz 
A Digital Thermometer for the APPLE II 

Carl J. Kershner 
A Home Message Center 
William McLean 
Applesoft II Shorthand 
Allen J. Lacy 
The Apple Stripper 

Bill Crouch 
Bi-directional Scrolling 
Roger Wagner 
Roadrunner— A Math Drill for Second Graders 

Peter A. Cook 
Lower Case and Punctuation in Applesoft 

James D. Childress 
An Edit Mask Routine 
Lee Reynolds 
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OSI 



The Basic Morse Keyboard 

William L. Taylor 
Streamlining the C2-4P 

James L. Cass 
Structured Basic Editor and Pre-Processor 

Robert Abrahamson 
OSI Memory Test in Basic 

William L. Taylor 
How Do You Connect Peripherals to Your Superboard 

Bruce Hoyt 
Hypocycloids 

E.D. Morris 
A Real-Time Clock for OSI Disk Systems 

Robert T. Kintz 
Some Useful Memory Locations and Subroutines 
for OSI BASIC in ROM 

S.R. Murphy 
If You Treat It Nicely, It Won't Byte 

Jack Robert Swindell 
Graphics and the Challenger C1P 

William L. Taylor 
The Great Superboard Speed Up 

J.R. Swindell 
Graphics and the Challenger C1P, Part 3 

William L. Taylor 
Polling OSI's Keyboard 

Edward H. Carlson 
Challenger II Cassette Techniques 

Richard A. Lary 
Graphics and the Challenger C1P, Part 4 

William L. Taylor 
OSI Basic in ROM— What's Where? 

Earl D. Morris Jr. 
Shorthand Commands for Your OSI Superboard II 

Henk J. Wevers 
Graphics and The Challenger C1P Part 5 

William L. Taylor 
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Editor's Note: Use this index as a guide to material which is of 
interest to you. Remember that most of the articles and features 
under the 'General' heading apply to 6502 systems in general. 
Also, many articles and programs which are classified for one 
system may be readily modified and/or adapted to another 
system. 



Missing MICRO Information? 



MICRO is devoted exclusively to the 6502. In addition, 
it is aimed at useful, reference type material, not just 
"fun and games". Each month MICRO publishes ap- 
plication notes, hardware and software tutorials, a 
continuing bibliography, software catalog, and so 
forth. Since MICRO contains lots of reference material 
and many useful program, most readers want to get 
the entire collection of MICRO. Since MICRO grew 
very rapidly, it quickly became impractical to reprint 
back issues for new subscribers. In order to make the 
older material available, collections of the reprints 
have been published. 

[A limited number of back issues are still available 
from number 7 to 18 and 20 to current. There are no 
19's left. Use the order form in this issue.] 

For a free copy of the Index for Volumes 1 and 2, 
please send a self-addressed, stamped envelope to: 
BEST of MICRO, P.O. Box 6502, Chelmsford, MA 01824 



The BEST of MICRO Volume 1 contains all of the 
significant material from the first six issues of MICRO, 
covering October/November 1977 through 
August/September 1978. This book form is 176 pages 
long, plus five removeable reference cards. The 
material is organized by microcomputer and almost 
every article is included. Only the ads and a few 
'dated' articles have been omitted. Surface . . . $7.00 
[Now in third printing!] Air Mall . . . $10.00 

The BEST of MICRO Volume 2 covers the second six 
issues, from October/November 1978 through May 
1979. Organized by microcomputer, this volume is 224 
pages long. Surface . . . $9.00 

Air Mail... $13.00 

The BEST of MICRO Volume 3, covering the twelve 
issues from June 1979 through May 1980, will be over 
400 pages long. It is scheduled for late summer 1980. 
The price is still to be determined. 
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NEW APPLE II / APPLE II PLUS SOFTWARE FROM 

ON- LINE SYSTEMS 

TIRED OF BUYING GAMES THAT BECOME BORING AFTER A FEW HOURS OF 
PLAY? ON-LINE SYTEMS IS DEDICATED TO DELIVERING SERIOUS SOFTWARE 
FOR THE DISCRIMINATING GAMESMAN. THESE PRODUCTS HAVE BEEN SIX 
MONTHS IN DEVELOPMENT AND PROVIDE THE QUALITY AND SPEED POSSIBLE 
ONLY THROUGH MACHINE LANGUAGE! 





ALL NEW 

HI-RES ADVENTURE ("MYSTERY HOUSE") 

What is an adventure game? According to the dic- 
tionary, an adventure is a hazardous or daring enter- 
prise; an exciting experience; to risk, hazard, to venture 
on. One who goes on an adventure is a venturer. A 
seeker of fortune in daring enterprises; a speculator. In 
essence, an adventure game is a fantasy world where 
you are transported, via your own computer. You are 
the key character of the fantasy as you travel through a 
land the likes of which you will fir\d in books that take 
you, through your imagination, to the world it is 
creating. 

Through the use of over a hundred Hi-Res pictures you play and see your adventure. You communicate with HI-RES 
ADVENTURE in plain english (it understands over 300 words!) All rooms of this spooky old house appear in full Hi-Res 
Graphics complete with objects you can get, carry, throw, drop, or ?. 

In this particular HI-RES ADVENTURE game, you are transported to the front yard of a large, old Victorian house. WheSlL . * 
you enter the house you are pulled into the mystery, murder, and intrigue and can not leave until you solve the puzzles. 
Your friends are being murdered one by one. You must find out why, and who the killer is. Be careful, because the 
killer may find you! As you explore the house there are puzzles to be solved and hazards to overcome. The secret 
passage-way may lead you to the answer. 

ALSO NEW FROM ON-LINE SYSTEMS 

SKEET/TRAP have become Olympic shooting sports and and obsession among Scatter-gunners all over the world. 
These games are the Ail-American although they have become international. 

SKEETSHOOT allows one to five shotgunners to test their marksmanship as they fire from the eight prescribed 
positions on an official NSSA skeet firing range. Each position provides a new perspective of the field with the pigeons 
travelling at different angles. At each position a pigeon is launched from one side of the field and then the other. At 
certain positions, pigeons are launched from bo th sides of the field simultaneously. This is a true game of skil 
simulating skeet shooting down to the last detail. 



TRAPSHOOT allows one to five shotgunners to 
test their markmanship. The trap firing range 
has five positions where the one to five players 
shoot from. Each player is at a different 
location on the field. The challenge is to shoot 
pigeons out of the sky which launch at random 
trajectories. The challenge is to hit the pigeons 
while they are still in gun range. 

SKEETSHOOT and TRAPSHOOT both allow 
you to control the size and speed of the pigeons 
and the width of your shotgun spray. Realistic 
sound-effects and HI-RES animation combine 
to make this simulation unparrelled for the AP- 
PLE. 

DEALER INQUIRIES INVITED! 

ALL SOFTWARE SHIPPED SAME DAY. 
PHONE ORDER: (805) 522-8772 



ON-LINE SYSTEMS, 772 NO H0LBR00K, SIMI, CA 93065 
SEND TO: 

QUANTITY TOTAL 



Hi-Res Adventure/Disk 



$24.95 



Skeetshoot/Cassette 



S14.95 



Trapshoot/Cassette 



$ 9.95 



Skeetshoot/Disk 



$19.95 



TrapshootlDisk 



$14.95 



Hi-Res Adventures & SkeetshootfDisk $37.50 



Payment: Check 

Master Chg/Visa #_ 
Expires: 



Subtotal 

6% tax (Calif.) 

Shipping 

Total 



$1.00 









' NOW PRESENTING... N 

Software for Apple 8 II 

for your En tertainment - Business - Education )% 

+++++++++++++++++++++++++++++++++++++++ y 

Star A ttr actions: 



+ WRITE-ON! Professional Word Processing lets you edit, move, delete, 
find, change and repeat any body of text, merge and save on disk. Does 
right-justified margins, centering, page numbering. You can enter name 
& address onto form letters when printing. Edit and merge any text disk 
file— even files not created by WRITE-ON— and spool text to disk for let- 
ter printing or editing. Chain up to 100 files in a single printer run. 
Needs Applesoft and 32K. 
On Disk with operating manual $99.50 

FILEMASTER I Here's a powerful data file manager giving you two pro- 
grams— FORMAT & RETRIEVAL. It handles everything from phone lists 
to legal abstracts. You can design your own data structure with up to 
500 characters per record and up to 15 searchable fields in any com- 
bination. Needs 32K. On Disk $49.95 

FILEMASTER II Has all the same features of FILEMASTER I plus allows 
for totaling, advanced math routines, more powerful print formatting, 
larger data fields, and disk-to-disk transfers $99.50 

+ Space (Edu-Ware) Six programs form a unique epic game series. 
Multi-faceted simulation of life in interstellar society. You and opponents 
must make life & death decisions. Keeps track ol your progress from 
one game to next. Needs 48K and Applesoft ROM. Disk $29.95 

Pot O'Gold I or our All New Pot 0' Gold II. A collection of 49 programs 
for 16K Apple. Everything from Logic to action games. Only a buck a 
game. Specify I or II. 
Price each: Tape $49 Disk $54 

+ Adventure This original, full-function game is the same as the one 
developed tor large mainframes. Fight off pirates and vicious dwarfs. 
700 travel options, 140 locations, 64 objects. Needs Applesoft ROM 
& 48K. Disk $29.95 

32K Disk Inventory: Use stock numbers, description, vendor, record of 
purchase and sales date, amount on hand, cost & sell price, total value. 
Holds up to 300 items. 

Disk $40 

+With Bill of Materials: Disk $50 

32K Data Base Cross file for phone lists, bibliographies, recipes. Run up 

to 9 lines of 40 columns each. Search by item anywhere. 

Disk $20 

24K Hi-Res Life Simulation Conway's equations on 296x180 screen. A 
mathematical simulation to demo population growth with birth, death and 
survival as factors. Tape $10 

16K Rainbow's Casino 9 gambling games: Roulette. Blackjack, Craps, 
Horserace. Yahtzee. Keno, Slot Machine, Poker, and Acey-Ducey Needs 
16K. Tape $29.95 Disk $34.95 

16K Space War: You in your space capsule battle against the 
computer's saucer ... in hi-res graphics. Tape $12 

16K Memory Verify Diagnostic routine to check range of memory. Indi- 
cates faulty addresses, data in memory cell, and faulty data. Tape — $5 



16K Appleodlon Music synthesis composes original Irish jigs. Enter your 

own music and save on tape or disk. Includes 3 Bach fugues. 

Tape $10 

+ 48K Edu-Pack (Edu-Ware) This package combines COMPU-READ-five 
speed reading programs; three PERCEPTION games where random 
shapes and sizes must be matched; and STATISTICS for computing 
Mean, Variance, Standard Deviation, and much more! Needs Applesoft 
ROM . Disk $39.95 

+ 32K Sargon II (Hayden) Here's the program that came in third against 
the big machines (mainframes and maxis) at the 9th North American 
Computer Chess Championship and placed first in the European 
Microcomputer Chess Championships! Has seven levels of play with 
Levels - 3 playing in tournament time. Need a challenge? This is it!! 
Tape $29.95 Disk $34.95 

16K Hi-Res Baseball (Programma International) This animated simulation 
of a major league baseball game is for two players. The scoreboard is in 
the lower left of screen with the "throw pointer" for directing a Ihrow 
in the lower right corner. Written entirely in machine language, the 
action is quick and smooth, making it the finest simulation of its kind. 
Tape $15.95 

OTHER SPECIAL ITEMS FOR YOUR APPLE II 
VERSAWRITER This digitizer drawing board, complete with a powerful 
software package on disk, lets you create any picture in color with high- 
resolution graphics. It's ideal for mass graphics. You can trace, edit, 
save and recall what you draw. It's a simple-to-use system tor students, 
artists, engineers and graphic programmers. Has an 8%"x11" working 
area. New applications added include: »Text Writer adds text to your 
pictures. You control size, color and direction of text; •Electronic Draw- 
ing lets you create schematics and includes commonly used symbols for 
transistors, OPAMPS. and FETS; 'Distance/ Area lets you compute 
distances on maps or area of any frame. Applesoft ROM and 

32K required $249.95 

Add $5 (U.S.) or S10 (Foreign) lor shipping. 

Apple Monitor Peeled Everything you wanted to know about the Apple 
Monitor but couldn't figure out. All the PEEKS, POKES, and CALLS ex- 
plained in an easy-to-understand form, written in plain English. 
Only $g.95 

Don't see what you've been looking for, here? Then write for our FREE 
SOFTWARE CATALOG. We're saving one just for you! 

To order, add $2 (U.S.): $5 (foreign) for shipping. California residents 
add 6% sales tax. Sorry, we cannot ship to P.O. Boxes. VISA/MASTER- 
CHARGE and BANKAMERICARD Welcomed! 
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Golden Plaza Shopping Center, Dept. 1A 

9719 Reseda Blvd., Northridge, CA 91324 

Telephone: (213) 349-5560 

+ =Apple Plus compatible 
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DOMINOES 



SPACE WARS 



FORECAST 



DEPTH CHARGE 



S 6.95 




RPN MATHPACK S19.95 




S 9.95 




S 9.95 




S 9.95 
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OTHELLO 










S 9.95 





SUPER NIM 




GRAND PRIX 



S 6.95 




FOOTBALL 



S 6.95 
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BASKETBALL 



S 9.95 



HOME ACCOUNTING S 9.95 



All orders include 3% postage and handling with a minimum ol 
SI .00. California residents include 6% Sales Tax, 

VISA MASTERCHARGE 



PET IS A TRADEMARK OF 
COMMODORE BUSINESS MACHINES, INC. 




PROGRAMMA 
INTERNATIONAL, Inc. 

3400Wilshire Blvd. 
Los Angeles, CA 90010 
(213) 384-0579 
384 1116 

384-1117 




DIR 'REF 



E.S.P. 



BLOCKADE 



SLOT MACHINE 



S 6.95 




S 9.95 




S 9.95 




S 6.95 




BATTLE SHIP 



S 9.95 
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LETTER SQUARES S 6.95 V ' 
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SHOOTING GALLERY S 9.95 



Dealer Inquiries Invited 



ZAP 



S 6.95 



